# foo.pm
package foo;
use bar;
sub import { printf("%s loaded foo\n", scalar caller) }
1;