thulben@bravo:~/perl
125> perl -le 'print "A" ^ "C"' | perl -nle 'print $_^"C"'
A
thulben@bravo:~/perl                                      
126> perl -le 'print "A" ^ "C"' | perl -nle 'print $_^"A"'
C
thulben@bravo:~/perl
127>