pack('n', $stru << 5 | $aw << 2 | $pos) #### pack('n', ($stru & 31) << 5 | ($aw & 7) << (2 & 3) | $pos)