Select Code to Download

my @myArray = qw(alfa beta gamma);
grep { print "$myArray[$_] at $_\n" } 0 .. $#myArray;

print "$myArray[$_] at $_\n" for 0 .. $#myArray;