if (grep($_ eq $row->[0], @fehler) and grep($_ eq $row->[1], @fehler) and grep($_ eq $row->[2], @fehler)) {...}