in reply to Re: Useful obfuscation for chatting
in thread Useful obfuscation for chatting

Ta dah!

@tr=qw(A-Za-z a-zA-Z);while(<STDIN>){eval"y/$tr[0]/$tr[rand(2)]/"& print for split''}

In Section Obfuscated Code