my $coderef=__PACKAGE__->can($subname) or die "$subname not found";
$coderef->(...);
[download]

Alexander