use Class::Can;
use Data::Dumper;

my %methods = Class::Can->interrogate( ref $bah );
print Dumper(\%methods);