for my $i (0..$#array) {
   print("Element $array[$i] was found at index $i\n");
}

##</code><code>##

for my $i (0..$#array) {
   my $e = $array[$i];
   print("Element $e was found at index $i\n");
}

##</code><code>##

for my $i (0..$#array) {
   for my $e ($array[$i]) {
      print("Element $e was found at index $i\n");
   }
}