1{ 2 n = split ($0, x, /[ ]+/) 3 print n 4 if (n != NF) 5 print "split botch at ", NR, n, NF 6 for (i=1; i<=n; i++) 7 if ($i != x[i]) 8 print "different element at ", i, x[i], $i 9} 10