my @all;
$#all = $#arr1;
$all[$_] = [ $arr1[$_], $arr2[$_], $arr3[$_] ]
   foreach 0..$#arr1;