in reply to Get a known substring from a string
This sounds as a XY Problem to me, and I suspect that you want to do Z, of which you haven't told us anything.
perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'
|
---|
In Section
Seekers of Perl Wisdom