for (my $i = 0; $i <= $#array; $i++) {
  # index is in $i
  # element is in $array[$i];
}

##</code><code>##

foreach (0 .. $#array) {
  # index is in $_
  # element is in $array[$_];
}