単語の頻度のカウント(シェルスクリプト版)

30分プログラム、その193。id:mzp:20071127と同じく単語の頻度のカウント。
シェルスクリプトで再現する。

お酒飲んで、よっぱらっているので簡単なやつで許してください。たぶん詳解 シェルスクリプトに同じやつが載っていた気がする。

使い方

$ ./freq word-split.scm
   1 Author
   1 C
   1 Copyright
   1 Hiroki
   1 MIZUNO
   1 Scheme
   1 This
   1 Timestamp
   3 accumulate
   2 and

ソースコード

#!/bin/sh
cat $@ | 
  tr -c '[A-Za-z]' "\n" |  # replace non-alphabet to NewLine (one word per line)
  sed '/^$/d' |            # remove blank line
  sort | uniq -c           # sort and count