1*9a7741deSElliott HughesBEGIN { FS = "a" } 2*9a7741deSElliott Hughes{ 3*9a7741deSElliott Hughes n = split ($0, x, FS) 4*9a7741deSElliott Hughes if (n != NF) 5*9a7741deSElliott Hughes print "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 "diff at ", i, x[i], $i 9*9a7741deSElliott Hughes} 10