print "They match!\n" unless ($abc ^ $ab) =~ /\x{3}/;