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/.