for ( my $i=0; $i<=$#array; $i+=1 ) {
 # pruefe $array[$i] auf Gleichheit ...
}