bar.pm:

package foo;
1;

test.pl:

use foo;
print "I'm alive!\n";
exit;