my $array_size = @array; # scalar assignement yields the size (number of elements) of @array

for (my $i = 0; $i < $array_size; $i++) {
  print $array[ $i ][0], $array[ $i ][1], $array[ $i ][2]; # etc
}