Struppi: Zeilenumbrüche ersetzen

Beitrag lesen

Hallo!

Zum komprimieren benutze ich Compress::Zlib;

Wenn ich nun einen String mit compress() komprimiere bekomme ich einen schönen kurzen String, aber mit Zeilenumbrüchen. Diese möchte ich nun ersetzen.
Ich habe es versucht mit:

$dest =~ s/\n/\n/g;

aber dies funktioniert nicht. Weiß jemand, wie ich hier die Zeilenumbrüche ansprechen muß. Muß ich da auf "Binärität" achten?

"Funktioniert nicht" ist eine der klarsten und deutlichsten Fehlermeldung in der Welt der Programmierer. Damit kann man den Sachverhalt das etwas nicht funktioniert genaustens beschreiben und alle die bei einer Fehlersuche helfen sollen erkennen sofort: "da funktioniert doch etwas nicht".

Ich weiss nicht wie du normalerweise Fehler suchst, aber bei CGI Programmen ist das oftmals nicht einfach und läßt sich nur mit Hilfe von Kontrollausgaben lösen. Also solltest du evtl. ein Beispiel haben, von dem was passiert und was nicht passiert. Bei obigen Beispiel solltest du dann nämlich gemerkt haben, dass es einwandfrei (auch ohne 'm') funktioniert.

#!/usr/bin/perl
use strict;
my $test = "aaaaaa\nbbbbbb\ncccccccc";
print "*****\n$test\n********";
$test =~ s/\n/\n/g;
print "*****\n$test\n********";

führt bei mir zu (den vermutlich) gewünschten Ergebnis.

struppi.