'split' mit Zeilenumbrüchen
Florian Auer
- perl
Hallo Forum,
ich habe ein Frage zu 'split' bei Zeilenumbrüchen:
Wie kann ich einen Text, der durch Zeilenumbrüche in einzelne Teile gegliedert ist, durch split trennen? Also so in etwa:
split(/\n/, $string);
und der Text sieht so aus:
hallo(br)
guten tag(br)
...
Danke im Voraus!
MfG Florian Auer
split(/\n/, $string);
Diese Variante funktioniert bei mir seltsamerweise nicht ...
split(/\n/, $string);
Diese Variante funktioniert bei mir seltsamerweise nicht ...
Hi!
Die funktioniert ganz gut so z.B.:
#! /usr/bin/perl
$text = "Guetn Tag!\nWie geht es Ihnen ?\nTschüß";
@ntext = split(/\n/, $text);
for(@ntext) {
print "$_<br>";
}
THE END
Stefan
split(/\n/, $string);
Diese Variante funktioniert bei mir seltsamerweise nicht ...
Das dürfte helfen:
$string =~ /\r//g;
@lines = split(/\n/, $string);
So short,
Beat
split(/\n/, $string);
Diese Variante funktioniert bei mir seltsamerweise nicht ...
Dann steht da vielleicht kein "\n", sondern etwas Anderes.
Wo hast Du denn die Zeilenumbrüche her? Wie das Posting von Stefan Priebe zu zeigen scheint, müßte es ja eigentlich gehen.
Vielleichst hast Du eine Datei eingelesen? Wenn das der Fall ist, könntest Du sie statt in einem Rutsch auch zeilenweise einlesen, die einzelnen Zeilen mit "chomp()" von Zeilenenden befreien und mit push (@zeilen, $_) in einem array speichern. Dann hast Du das, was Du vermutlich haben willst.