?????????? ????????? - ??????????????? - /home/.cpan/build/Sub-Uplevel-0.2800-0/t/lib/MyImporter.pm
???????
package MyImporter; use warnings; use strict; use Sub::Uplevel qw/:aggressive/; sub import_for_me { my ($pkg, @p) = @_; my $level = 1; my $import = $pkg->can('import'); if ($import) { uplevel $level, $import, ($pkg, @p); } else { warn "no import in $pkg\n"; } } 1;
| ver. 1.6 |
Github
|
.
| PHP 8.2.30 | ??????????? ?????????: 0 |
proxy
|
phpinfo
|
???????????