$bob = pack("B*","1.11011001001e+015")