in reply to Perl is ~magic~!

You said it, duc!  Perl is ~magic~!
s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/

In Section Meditations