Xor'ing strings is possible and fun.
Simple example:

perl -le'print "aaaa" ^ "+ 1)"'
[download]

2;0 juerd@ouranos:~$ perl -e'undef christmas'
Segmentation fault
2;139 juerd@ouranos:~$
[download]