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