Class::Plugged
でっちあげてみた。
package Class::Plugged;
use strict;
use warnings;
use Class::Inspector;sub import {
my $class = shift;
my $pkg = caller;for my $method ( @{Class::Inspector->methods($class) || []} ) {
next if $method eq 'import';
no strict 'refs';
*{"$pkg\::$method"} = $class->can($method);
}
}1;
却下。