use Wx 0.15;
s~\z~qq<\x57\x78\x3a\x3a>
.(join'',map{2^length()?$_
:(split//,Wx::SysErrorMsg 5632>>9)[c^$_-1]}
qw i L 25 34 F 13 62 17 24 E 51 52 33 59 i).
q, ,.(join'',(split//,Wx::SysErrorMsg 9536 >> 6)
[map{d^$_-1}24,17,9,12,59])
._JOKE ~ee;