Re^2: Golf: Count unique words

[Anonymous Monk]

#!/usr/bin/perl -0nla $w{$_}++for@F;print"$_ ($w{$_}) "for keys%w;print~~@F small correction :)

[Anonymous Monk]

#!/usr/bin/perl -0na
$w{$_}++for@F;print"$_ ($w{$_})
"for keys%w;print~~@F

there is literal \n at the end of second line