>perl -e "print 'A'|'B' C >perl -e "print 'C'&'E' A >perl -e "print 'A'^' ' a