perl -MDevel::Symdump -le'eval"require $ARGV[0]";print for Devel::Symdump->new($ARGV[0])->functions' HTML::Parser

##</code><code>##

use strict;
use warnings;

use Devel::Symdump;

my $class = shift || die "need module name";

eval "require $class";

my $obj = Devel::Symdump->new($class);
print $_,$/ for $obj->functions;

##</code><code>##

print $_,$/ for grep ! /::_/,  $obj->functions;