dedupli (381B)
1 #! /bin/awk -f 2 { 3 lines[NR] = $0 4 } 5 6 END { 7 for (i = 1; i <= NR; i++) { 8 is_prefix = 0 9 for (j = 1; j <= NR; j++) { 10 if (i != j && length(lines[i]) < length(lines[j]) && index(lines[j], lines[i]) == 1) { 11 is_prefix = 1 12 break 13 } 14 } 15 if (!is_prefix) { 16 print lines[i] 17 } 18 } 19 }