Need to catch the following:
> if ($diff > $size) {
if ($diff && $diff > $size) {
Because the difference must be in the range 1 .. n - 1
Paul Seamons
PS - unmaintainable solution in perl
perl -ne 'chop;@a=split;$n=grep{$t=abs($a[$_]-$a[$_-1]);!$t||$t>[EMAIL
PROTECTED]
$#a;print$n?"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.
*/
