Win8 Strawberry 5.8.9.5 (32)  Sat 05/28/2022  0:35:22
C:\@Work\Perl\monks
>perl

use strict;
use warnings;

printf "%04b \n", 0b1100 ^ 0b0111;
printf "%04b \n", 0b0111 ^ 0b1100;

^Z
1011
1011