DB<22> $in   = 0b10101010                                                                                                                                                                                                                       

DB<23> $mask = 0b11110000            # 1 keep 0 erase                                                                                                                                                                                                            

DB<24> printf "%b", $in & $mask                                                                                      
10100000