奇怪，怎么回事呢？

[ajiva]

/////VC++ cfile f
f.Write(*buf1,sizeof(buf struct));
f.Write(*buf2,sizeof(buf struct));
f.Write(*buf3,sizeof(buf struct));

//////perl
open(FILE,"<$dataroot/$file");
while(<FILE>)
{
print "$_\r\n";
}

//////VC++ Internet file f
f.Read(&buf1,sizeof(buf struct));
f.Read(&buf2,sizeof(buf struct));
f.Read(&buf3,sizeof(buf struct));
本地取得后，读到我的结构里面去。。
字节结果错位了。。
奇怪，怎么回事呢？
我的结构里有字符串、ＷＯＲＤ。。

[ajiva]

大拿看看啊

[peifang]

你没事print "$_\r\n";干什么
直接用

open(FILE,"<$dataroot/$file");
while(<FILE>)
{
print ;
}
close FILE;

[lucong]

你的perl程序要实现什么功能? 就是逐行显示吗?