统计单词出现的次数

#!/bin/sh
echo -n "xian zhi ci shu:"
less $1 |grep -P '^\d' | wc -l
less $1 |grep -P '^S' | sort|uniq > /tmp/zcc.vmlist
while read line
do
echo $line
less $1 |grep -P "$line"|wc -l
done < /tmp/zcc.vmlist
rm /tmp/zcc.vmlist