Select Code to Download

  DB<5> x "" . Devel::Peek::CvGV( \&foo )
0  '*main::foo'

my $coderef = do { no strict 'refs'; \&{ $subname } };