for my $idx (0..$#array) {
   for my $ele ($array[$idx]) {
      ...
   }
}