Here's another JAPH idea.

I'd be interested in your comments.

$q='5ecd0189d43b0a3b7041263b'; $y=
'20414345484a4b4c4e4f5052535455' ;
for(@y=($y=~/../g)){ ($_=hex () )}
for(@q=($q=~/./g)){print(lc(chr(@y
[hex((substr($q,$p,1)))]))); $p++}
[download]

--
Weaselling out of things is important. It's what separates us from the animals ... except the weasel.