Select Code to Download

#!/usr/bin/perl
use strict;
...
    my @command_output = $thread->join ;
    print "job done\n";
}

package myTest;

...
}

1;

#!/usr/bin/perl

...
    my @command_output = $thread->join ;
    print "job done\n";
}

Thread 1 terminated abnormally: Undefined subroutine &main::1