In article <ajm0h8$gcr$2@post.home.lunix>, perl-golf@ton.iguana.be (Ton Hospel) writes: > -l $_=$"x2**pop;s^$^/\\^,print,s/(?<=\\)../$&^v15."|"/egwhile+s\^ \\ -l $_=$"x2**pop;s'$'/\\',print,s/(?<=\\)../$&^"\17|"/egwhile+s\^ \\ (or replace the \17 by the hard char \x0f, though my emacs doesn't like that)Thread Previous | Thread Next