my $a = 10101010
my $b = 10000000

my $XorComb = $a xor $b
my $orComb = $a or $b
my $AndComb = $a and $b