Select Code to Download

use strict;

...
print "below mysub2\n";

$t2->join();

package TEST::TEST;
use strict;
...
}

1;