From: PerlyGates <nothanks@...>
Date: 2006-04-23T02:35:56+09:00
Subject: Re: Text Munger (#76)

Alex Barrett wrote:
> Use negated word boundaries (\B) instead of the lookarounds to lose a 
> few
> characters.

Thanks.  And character twiddling rather than sort:

    perl -pe 's/\B([a-z])([a-z])\B/rand>.5?$1.$2:$2.$1/egi'

-- 
Posted via http://www.ruby-forum.com/.