Select Code to Download

#!/usr/bin/perl -w
use strict;
...
        } 
    }
}

for(count2=1;$count2<=1;$count2++){
    #stuff
}

#!/usr/bin/perl
for (my $count2=1; $count2<=1; $count2++) {
    print "Count2: $count2\n";
}