#!/bin/sh
#
# print word frequency

deroff "$@" |
        tr -c 'A-Za-zÄÖÜäöüß-' '\n' | tr A-ZÄÖÜ a-zäöü |
	sed '/^ *$/d'| sort |uniq -c | awk '
{sum+=$1; a[$2]=$1;}
END {for (x in a) {printf("%s\t%.2f\t%4d\n", x, a[x]/sum, a[x])} }
'| sort -nr -k 3