On Wed, 2005-05-11 at 13:11 -0700, Ben Tilly wrote:
> Do I smell golf?
>
> perl -le 'map/(.).*\1/||print,glob"{1,2,3,4,5}"x5'
Nice!
I was just playing with a map version trying to see how to shorten my
regex.
perl -e 'map {print$_,"\n"if/[1-5]{5}/&&! /([1-5]).*\1/} (12345..54321)'
--
Sean Quinlan <[EMAIL PROTECTED]>
_______________________________________________
Boston-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/boston-pm
