foreach my $in (0..$#array2) { $count++ if $array1[$in] eq $array2[$in]