1NF > 0 { 2 t = $0 3 gsub(/[ \t]+/, "", t) 4 n = split($0, y) 5 if (n > 0) { 6 i = 1 7 s = "" 8 do { 9 s = s $i 10 } while (i++ < NF) 11 } 12 if (s != t) 13 print "bad at", NR 14} 15