print unpack("h*",$bitstring);