> cat Module.pm script.pl; perl script.pl 
#---- Module.pm
warn "NO NO NO";

package Module;

sub whatever {}

1;

#---- script.pl
use Module;

#---- output
NO NO NO at Module.pm line 1.