for my $i ( 0 .. $#array1 ) {