Hi,
danek aber Du hast meine Frage falsch verstanden.
Das löschen war mir soweit klar.
Jedoch wie packe ich es in eine If z.B:Wie frage ich nach den 2-3 Leerstellen.
Wie sieht der Verlgeich aus..
Du brauchst keinen Vergleich. Der s//-Operator sucht automatisch nach allen entsprechenden Vorkommen und löscht sie.
mit folgendem Skript bekomme ich nun das (hoffentlich) gewünschte Ergebnis:
$s = qq~
Fehler 123
Fehler xy
hachja Feher
Fehler Fehler
~;
$s=~s/\n{2,}/\n/g;
$s=~s/^\n//;
$s=~s/\n$//;
Das liefert mit dann in $s:
Fehler 123
Fehler xy
hachja Feher
Fehler Fehler
Mit der ersten s//-Zeile werden alle Vorkommen von zwei oder mehr \n durch ein einzelnes \n ersetzt, die beiden anderen, entfernen \n's am Anfang bzw. Ende des Strings.
HTH
wunderwarzenschwein
--
ss:} zu:$ ls:} fo:| de:] va:) ch:? sh:( n4:# rl:? br:> js:| ie:( fl:{ mo:)
ss:} zu:$ ls:} fo:| de:] va:) ch:? sh:( n4:# rl:? br:> js:| ie:( fl:{ mo:)