Help for this page

Select Code to Download

Select or download this

[0] Perl> $s = 'x x x a x x x b x x x a x x x b x x x';;
[0] Perl> $s =~ tr[ab][ba];;
[0] Perl> print $s;;
x x x b x x x a x x x b x x x a x x x