Select Code to Download

#!/usr/bin/perl
use threads;
...
@r=$thr ->join();

__END__

#!/usr/bin/perl
use threads;
...

__END__