use strict;
require "pit.pm"; ## also use or require w/o quotes

my $Email="abc\@example.com";
print "1) $Email\n";

 pit::printIT();

print "1) $Email\n";
print "1) done\n";

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