Friday Perl Challenge

[Joel Bernstein]

On Fri, Apr 20, 2007 at 10:34:56AM +0100, Spiros Denaxas wrote:
> On 4/20/07, Joel Bernstein <joel at fysh.org> wrote:
> >perl -nle 'map{$X{$_}++}split/\s+/}{print"$_:$X{$_}"for sort keys%X'
> >
> 
> Is it me or did he just own this test?

You wait. All I did was throw out a sample implementation. The golfers
and clever guys will come next and make me look stupid.

/joel