Re^3: Golf: Count unique words

[eyepopslikeamosquito]

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){