[kw-pm] Free beer: still unclaimed!

[Andrew Kohlsmith]

On November 17, 2004 08:48 pm, Daniel Allen wrote:
> I daebetd and daebted wehethr I tuhhogt tihs was a cool egonuh
> use of map... and I tnihk I'll let you dcdiee. :)
>
> perl -pe 's/\B(\w+)\B/join"",map chop,sort map{rand().$_}split"",$1/eg'

ok you *have* to explain this one at the next meeting...  which I hope isn't 
tomorrow because I can't make it :-(

-A.