nicht angemeldet
Hi,
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
Vielleicht offenbart sich mir hier wieder mal eine Wissenslücke, aber wieso ersetzt du %nn durch die pack-Anweisung? Da würde doch dann aus "%20" sowas werden "%pack("C", hex($1))", oder? Und was bedeutet "e" als Flag, sicher meinst du "i".
e als Flag heisst, dass der Ausdruck auf der rechten Seite der Ersetzung als Code ausgeführt wird (*E*val). Darum ersetzt er das auch nicht mit "pack(...)" sondern mit dem entsprechenden Rückgabewert von pack.
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:)