Urldecode.pl

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