in reply to Re^2: Golf: Count unique words
in thread Golf: Count unique words

Sh?aving seven strokes:

#!/usr/bin/perl -lp ++$t,++$w{$_}for/\w+/g}for(map("$_ ($w{$_})",sort keys%w),$t){