package common;
require common::sense;
*import = sub { $code = common::sense->can('import') and goto $code }

##</code><code>##

use common sense;
print $foo;

##</code><code>##

[tai@miranda (pts/0) ~]$ perl -Ilib example.pl
Global symbol "$foo" requires explicit package name at example.pl line 2.
Execution of example.pl aborted due to compilation errors.