for my $i (0 .. $#array) {
    if ($array[$i] eq ... ) {

##</code><code>##

for my $i (@array) {
   if ($i eq ... ) {