Re: Swap foo and bar in text?

[davido]

I don't know how it benchmarks, and would need to be convinced that it matters. ;) However, here is another way to do it.

my %swaps = ( 
    foo => 'bar',
    bar => 'foo'
);
$str =~ s/(foo|bar)/$swaps{$1}/g

[Cody Fendant]

It benchmarks marginally better than the "percentage" method but still way slower than the "evaluated right hand side" method.