my @a = (1 .. 9);  # for instance!!
for my $e (@a) {
  $e += 1;
}