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