in reply to Re: Token Abuse Japh
in thread Token Abuse Japh

Thank you, chargrill ++ a delightful read.

I'm glad you referenced Perl Idioms Explained - my $count = () = /.../g, because I actually hadn't intended to use it; I just came to a point where I realized I needed it.  So it was serendipitous that I had just read that node the other day.

@ARGV=split//,"/:L"; map{print substr crypt($_,ord pop),2,3}qw"PerlyouC READPIPE provides"