$zeile =~ s/\015\012\|\015|\012//sg; // Lehrzeichen und Backspace entfernen