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