my$c;$_="7072696e7420224a75737420616e6f74686572205065726c206861636b65725c6e223b";
while(m((..))sg){$c.=chr hex$1;}return$c;