my $bit_set = $old_number | 0x2;