package module; sub main {    print "running module!\n"; } _ _FILE_ _ eq $0 and main; sub test {    print "module::test()\n"; } 1;