my $bits = unpack("x1 C1", $bitstring);