...
| Code Block | ||||
|---|---|---|---|---|
| ||||
use UNIVERSAL qw(can); # deprecated
# ...
sub doit {
my ($func) = @_;
if (can($self, $func)) {
$self->$func();
}
# ...
}
|
While Although this code works correctly now, the use statement will one day not be accepted by the Perl interpreter.
...
Tool | Version | Checker | Description |
|---|---|---|---|
Perl::Critic | 5.0 | Modules::ProhibitEvilModules | Implemented |
B::Lint | 5.0 | ... is deprecated and will be removed in a future ... |
Bibliography
| [CPAN] | Elliot Shank, Perl-Critic-1.116 Modules::ProhibitEvilModules, ProhibitUniversalCan, ProhibitUniversalIsa |
| [CPAN] | Ragwitz, Florian. UNIVERSAL |
...