package TestLoad; sub hi { print "hello\n"; } 1;