# Main script use TEST2; use TEST qw( test_sub ); test_sub();