Beim Austausch von Text können unterschiedliche Zeilenenden auftreten. Für ein Lernbeispiel lässt sich diese einzelne Eigenschaft untersuchen, ohne Absender, Inhalt oder Struktur einer Nachricht eigenmächtig umzuschreiben.
Ausgabe getrennt erzeugen
Dieses eigenständige Beispiel liest von der Standardeingabe und schreibt auf die Standardausgabe. Verwende eine harmlose Beispieldatei und ein anderes Ausgabenziel.
use strict; use warnings; local $/; my $text = <STDIN> // ''; $text =~ s/\r\n/\n/g; print $text;
Den Umfang verstehen
Die Ersetzung verändert ausschließlich die Folge aus Wagenrücklauf und Zeilenvorschub in einen Zeilenvorschub. Sie repariert keine MIME-Struktur, Zeichencodierung oder Mailheader. Binäre Anhänge und vollständige Nachrichten mit Signaturen sind keine geeigneten Versuchsobjekte.
Vorher und nachher vergleichen
Prüfe eine kleine Textdatei mit zwei Zeilen, eine bereits normalisierte Datei und eine leere Eingabe. Das Ergebnis muss lesbar sein und den erwarteten Inhalt bewahren. Überschreibe niemals gleichzeitig die Datei, aus der du gerade liest.