# wordfreq.awk --- print list of word frequencies
{
$0 = tolower($0) # remove case distinctions
# remove punctuation
gsub(/[^[:alnum:]_[:blank:]]/, "", $0)
for (i = 1; i <= NF; i++)
freq[$i]++
}
END {
sort = "sort -k 2nr"
for (word in freq)
printf "%s\t%d\n", word, freq[word] | sort
close(sort)
}
| Name | Type | Size | Permission | Actions |
|---|---|---|---|---|
| alarm.awk | File | 2.31 KB | 0644 |
|
| anagram.awk | File | 1.33 KB | 0644 |
|
| awksed.awk | File | 515 B | 0644 |
|
| cut.awk | File | 3.61 KB | 0644 |
|
| dupword.awk | File | 507 B | 0644 |
|
| egrep.awk | File | 1.91 KB | 0644 |
|
| extract.awk | File | 1.74 KB | 0644 |
|
| guide.awk | File | 165 B | 0644 |
|
| histsort.awk | File | 283 B | 0644 |
|
| id.awk | File | 1.22 KB | 0644 |
|
| igawk.sh | File | 3.11 KB | 0644 |
|
| indirectcall.awk | File | 952 B | 0644 |
|
| labels.awk | File | 1014 B | 0644 |
|
| split.awk | File | 1.17 KB | 0644 |
|
| tee.awk | File | 770 B | 0644 |
|
| testbits.awk | File | 729 B | 0644 |
|
| translate.awk | File | 1.15 KB | 0644 |
|
| uniq.awk | File | 2.64 KB | 0644 |
|
| wc.awk | File | 1.45 KB | 0644 |
|
| wordfreq.awk | File | 347 B | 0644 |
|