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


in reply to Re: Undocumented Operator Japh
in thread Undocumented Operator Japh

Nicely done, chargrill, as always++


s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/