SZ
Есть ли подход попроще?
sub check_package_is_loaded {
my $package = $_[0];
no strict;
*s = *{"${package}::"};
%s ? 1 : ''
}Есть
sub check_package_is_loaded {
my $package = $_[0];
no strict;
*s = *{"${package}::"};
%s ? 1 : ''
}
