Help for this page
print unpack "H*", pack "f*", 1, 1, 1, 1, 1.5, 1.5
@floats = unpack "f*", pack "N*", unpack "V*", $floatingpointdata;