awk'da kelime sayma programı

#!/usr/bin/awk -f
BEGIN {
    FS="[^A-Za-z]"
}
{
    for (i=1; i<NF; i++) {
        words[i]++;
    }
}
END {for (word in words) print word,words[word]}

Bir diğer gece yarısı çiziktiriği...