in reply to Test if a string is a sub name
As a bonus, you can define the package with a variable with can:sub My::Filters::known { } sub My::Filters::forward; for my $string (qw[known unknown forward]) { warn $string if My::Filters->can($string); }
sub My::Filters::known { } sub My::Filters::forward; sub My::Other::Filters::forward; for my $package (qw[My::Filters My::Other::Filters]) { for my $func (qw[known unknown forward]) { warn $package . '::' . $func if $package->can($func); } }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Test if a string is a sub name
by clscott (Friar) on Oct 06, 2022 at 12:41 UTC |