ref: 7d562f0dff4db4ea7f7e91f462c4adf552b1b410 dir: /testdir/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" }