Re: $10K coding deathmatch

[Alan Young]

perl -ape '$_=((grep{(abs($F[$_]-$F[$_-1])||@F)>[EMAIL PROTECTED])?"not a
":"")."match\n"'

/*
PLUG: http://plug.org, #utah on irc.freenode.net
Unsubscribe: http://plug.org/mailman/options/plug
Don't fear the penguin.
*/