$line =~ tr/ OK/X/c;  # alles ausser Leerzeichen, "O" und "K" umwandeln in "X"