ref: ba4a1c07f1bc7622f8a3dcd4f2d383f4ec70fc1c dir: /test/t.index/
{ n = length d = 0 for (i = 1; i <= n; i++) if ((k = index($0, substr($0, i))) != i) { d = 1 break; } if (d) print $0, "has duplicate letters" }