my @treffer;
for (@fehler) {
  for my $i (0..2) {
    $treffer[$i]=1 if /$row->[$i]/;
  }
}
print "Deine Muster sind im Array" if $treffer[0] && $treffer[1] && $treffer[2];