$array2[$n] = $array1[$n]; #### for my $i (0..$#array1) { for my $j (0..$#array2) { # do something } }