$value = 5242880; $value = $value | 0x0011; $setbits = unpack "%32b*", $value; printf "$setbits bits are set in %#.8x\n", $value;