for my $i (0..$#arr) {
  do_whatever();
}