请教unpack的问题

wyting

要把一个二进制的文件解成文本的，文档上说明是：

Record  field name, contends	Byte	Type
VersionNum=0x08	1	Hex
RecordType	1	Hex
RecordLength	2	Int
TimeStamp	4	Int

比如读出来的一条记录应该是：

8
1
297
1183450922


我现在用

1. $blocksize = read(FP,$buffer,2*1024*1024);
   
2. print "$blocksize\n";
   
3. ($VersionNum,$RecordType,$RecordLength,$TimeStamp) = unpack("h1 h1 n2 L4", $buffer);

复制代码

前面三个字段都能正确读出来，第四个总是不对
上面的代码读出为
8
1
297
18058

我换了所有模式，出来都是18058 （原始文件数据是没错的），请问第四个字段应该怎么读啊？？

福瑞哈哥

把格式中的数字都去掉。

nkcsx

try unpack('hhnL', $buffer);
不过很奇怪为什么你要用n和L呢，n能是网络字节序而L不保证呀

wyting

多谢，改成这样就可以了

1. ($VersionNum,$RecordType,$RecordLength,$TimeStamp) = unpack("h h n N", $buffer);

复制代码

为什么呢？什么时候要数字，什么时候不要呢？

flw

原帖由 wyting 于 2007-7-4 09:59 发表
多谢，改成这样就可以了($VersionNum,$RecordType,$RecordLength,$TimeStamp) = unpack("h h n N", $buffer);

搞清楚你需要的到底是 N，还是 I。虽然这两者的效果有时候是一样的。

为什么呢？什么时候要数字，什么时候不要呢？

看 perldoc perlpacktut，本版 apile 前辈曾经发过译文。

nkcsx

这个.
http://www.chinaunix.net/jh/25/174939.html

wyting

多谢