package MyStandardModules; use Time::HiRes (); sub import { my $dest_pkg = caller(); eval "package $dest_pkg; Time::HiRes->import('gettimeofday');"; } 1; #### #!/usr/bin/perl -wl use strict; use MyStandardModules; print scalar gettimeofday(); #### package MyStandardModules; use strict; sub import { strict->import(); } 1; #### #!/usr/bin/perl { use MyStandardModules; print $foo; # error } print $bar; # "OK", as outside of strict's scope __END__ $ ./889426.pl Global symbol "$foo" requires explicit package name at ./889426.pl line 5. Execution of ./889426.pl aborted due to compilation errors.