# Main script require 'TEST2.pm'; require 'TEST.pm'; test_sub(); #### # TEST.pm *test_sub = *TEST::test_sub; package TEST; sub test_sub { print "Hello, world!\n"; } #### # TEST2.pm package TEST2; require 'TEST.pm'; return 1;