my $bit = ($mask == ($num & $mask))? 1: 0