0: $a=" Jacehklnoprstu";@b=split//,"1ECD0289D54B0A4B7052364B"; 1: foreach $c(@b){$d.=substr($a,hex($c),1);}print"$d\n";
In reply to This was completely wasted on my wife. by cciulla