print unpack 'b64', pack 'd', $float;; 1011110110001011101100101110110101100111111000110111101000000011