#!/usr/bin/perl -p

# converts HTML/HTTP URL style %-sign escapes to direct representation
# e.g., converts this
#	http%3A%2F%2Fwww%2Efoo%2Ecom%2F/foo+bar/
# to this
#	http://www.foo.com/foo bar/

#tr/+/ /;   # don't do this, spaces in URLs are bad-bad-bad
s/%(..)/pack('c', hex($1))/eg;