s/%([[:xdigit:]]{2})/pack 'H',$1/eg;