Help for this page

Select Code to Download

Select or download this

use PPI;

...
my @sub_names = map { $_->name } @$subs_ref;

print "@sub_names\n";