use Data::Dumper;
use Devel::Symdump;
my $s = Devel::Symdump->new();
print Dumper($s->functions());