Perl Skript zum Erstellen von ZIP's - Probleme

[Christian Kruse]

Hallo Siechfred,

Logisch:

$text =~ tr/\/ /;

heißt: ersetze einen Backslash durch ein Leerzeichen ('/ /'). Du meinst vermutlich sowas:

$text =~ s/\//g;

Nein, er meint vermutlich:

$text =~ tr/\//d;

Immerhin etwa 14x so schnell allerdings dafuer nur fuer einfache Suchen-und-ersetzen-
Ausdruecke geeignet:

Benchmark: timing 10000 iterations of s, tr...
         s: 391 wallclock secs (362.40 usr +  0.51 sys = 362.91 CPU) @ 27.56/s (n=10000)
        tr: 27 wallclock secs (25.32 usr +  0.03 sys = 25.35 CPU) @ 394.48/s (n=10000)

Grüße,
 CK