Opened by zcmaster at 2004-01-14 16:34
User since
2003-08-04
2036 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
2036 Artikel
BenutzerIn
[quote=Dubu,15.01.2004, 11:08]1.) Es fehlt in der zweiten Zeile der Backslash vor dem "000". Wenn das vorher "funktioniert" hat, dann nur, weil Perl vorher den Fehler ignoriert hat.
2.) Das geht einfacher mit
Alle Zeichen bis auf eines explizit aufzufuehren um dann wiederum das Komplement zu bilden (Option /c) ist unsinnig. Nenne direkt das eine Zeichen, das du behandeln moechtest.
Ausserdem war der Kommentar zur zweiten Zeile falshc. \015 ist kein LF, sondern ein CR. Was "\n" intern ist (CR oder LF), haengt von der Plattform ab.[/quote]
oder?
Gruss
2.) Das geht einfacher mit
Code: (dl
)
1
2
$dokument =~ tr/ / /s; # mehrfache Blanks weg
$dokument =~ tr/\015/\n/s; # wandle CR in \n und fasse zusammen
Alle Zeichen bis auf eines explizit aufzufuehren um dann wiederum das Komplement zu bilden (Option /c) ist unsinnig. Nenne direkt das eine Zeichen, das du behandeln moechtest.
Ausserdem war der Kommentar zur zweiten Zeile falshc. \015 ist kein LF, sondern ein CR. Was "\n" intern ist (CR oder LF), haengt von der Plattform ab.[/quote]
Code: (dl
)
$dokument =~ tr/ +/ /s; # mehrfache Blanks weg
oder?
Gruss