perl -E '$bits=40; $lsb=3; printf("%b", ((2**$bits)-1) << $lsb)' 1111111111111111111111111111111111111111000