# TEST2.pm package TEST2; use TEST qw( test_sub ); 1;