is there a solution with a foreach() function

print +(@$array1,@$array2)[$_, $#$array1+1+$_], "\n" for 0..$#$array1;
[download]

hth,
PooLpi