On Thursday 02 November 2006 8:35 am, Alan Young wrote: > perl -ape '$_=((grep{(abs($F[$_]-$F[$_-1])||@F)>[EMAIL PROTECTED])?"not a > ":"")."match\n"'
Wow! Truly a thing of beauty. "-a" - who knew. Paul /* PLUG: http://plug.org, #utah on irc.freenode.net Unsubscribe: http://plug.org/mailman/options/plug Don't fear the penguin. */