$ echo package somethingelse; 1; > foo.pm

$ perl -e " use foo; die 2 "
2 at -e line 1.