Select Code to Download

#! perl -slw
use strict;
...
#...

print for $output1, $output2;

#! perl -slw
use strict;
...
my $output2 = $t2->join;

print for $output1, $output2;