^ or ^= is a good start. XOR is your friend.

See encryption golf (one time pad) for some Perl Golf over the one-time pad using XOR. It's a fairly fast and very simple shared secret algorithm. It's also very secure if you actually only use the key once, and it's absolutely trivial to implement.