#! /usr/local/bin/perl -w use lib '.'; require 'foo.pm'; print "running\n"; # foo.pm package foo; INIT { warn "foo init\n" } 1;