for my $i (0..$#$array1) {
   print("$array1->[$i], $array2->[$i]\n");
}