Difference between revisions of "Urldecode.pl"

From Organic Design wiki
(encode/decode wrong way round, switch code)
Line 1: Line 1:
# Decode an URL-encoded string
+
<perl># Decode an URL-encoded string
$str =~ s/([^A-Za-z0-9])/sprintf("%%%02X", ord($1))/seg;
+
$str =~ s/\%([A-Fa-f0-9]{2})/pack('C', hex($1))/seg;</perl>
 
[[Category:PERL]]
 
[[Category:PERL]]

Revision as of 15:49, 6 February 2014

<perl># Decode an URL-encoded string $str =~ s/\%([A-Fa-f0-9]{2})/pack('C', hex($1))/seg;</perl>