Help for this page
s/\%([0-9A-Z]{2})/chr(hex($1))/egi;
{ use bytes; s/\%([0-9A-Z]{2})/chr(hex($1))/egi; }