Help for this page

Select Code to Download

Select or download this

use B::Deparse;

...

my $somevar = B::Deparse->new();
print $somevar->coderef2text(\&somecode);