Ich habe ein Tk-Text Widget (my $text->Scrolled('Text', -scrollbars => 'oe', -font => '{Arial} 12', -width => 50, -height => 4)->pack;) mit einer Breite von 50. Wenn ich in dieses Text eingebe, dann bricht es in der Anzeige automatisch die Zeilen um wenn das nächste Wort nicht mehr in die Zeile passt.
Ich kann auch selbst einen Zeilenumbruch erzwingen, in dem ich Enter drücke.

Den Text speichere ich dann mit my $text_var = $text->Contents; in eine Variable.

Die manuellen Zeilenumbrüche werden dabei gespeichert aber die automatischen nicht. Gibt es eine Möglichkeit diese ebenfalls zu speichern?
Vielleicht in dem man den Text Zeilenweise ausliest und nach jeder Zeile ein \n anhängt?