Select Code to Download

for my $arr2(@arr2) {

for ( my $j = 0; $j <= $#arr2; $j += 4 ) {

        $seen = substr($arr2[$j], 0);

        $seen = $arr2[$j];