for my $i ( 0 .. $#array ) {
 # pruefe $array[$i] auf Gleichheit ...
}