Monks,

I have difficulties converting data on a binary format to decimal numbers related to this node. I suspect the number are encoded using a float. I'm able to see what the results should be using a third-party tool.

The number should perform as follows:

• 3F F0 00 00 00 00 00 00 should yield 1.
• 40 59 00 00 00 00 00 00 should yield 100.
• 41 33 1A 9D 00 00 00 00 should yield 1251997.

What kind of conversion of unpack trickery am I in search for?

A hexdump of the source file is available on my pad (relax it's only 192 bytes).

Update: It seems like this does the trick (updated as shown by Anonymous Monk):

# read number: 8 bytes, return decimal value
sub getnumber {
  my $buffer = undef;
  my $num = read($FH, $buffer, 8);
  return unpack 'd*', reverse $buffer;
}
[download]

Update: pfaut++ and Fletch++ for good advice to stubborn monk.