Select Code to Download

use strict;
require "pit.pm"; ## also use or require w/o quotes
...
print "1) done\n";

#use pit; ## doesn't work here either

package pit;
sub printIT {
...
  print "2) #xyzzy\n";
}
1;

wf13[~]>perl testGlobal.pl
1) abc@example.com
2)
1) abc@example.com
1) done