my ($datetime, $open, $high, $low, $close, $volume, $interest) = unpack "A14f5Q", $h{$key};