my $a;
$a = $a | 1;
my $b = $a | 3 | $a
