@array1 = qw( a b ); @array2 = qw( c d ); @array3 = qw( e f ); # Assumes all array are the same length. foreach (0..$#array1) { print($array1[$_], $array2[$_], $array3[$_], "\n"); } # output # ------ # ace # bdf