http://www.perlmonks.org?node_id=1193992


in reply to I came, I saw, I ...

XYZ-ed the problem.

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'