for f in /usr/local/share/perl/lib/5.8.3/pod/*.pod
do pod2text $f
done | spell | wc -l
   9154