my @myArray = qw(alfa beta gamma)
grep { warn "at position ??? there is $_\n" } @myArray;