如何运用perl语言读取二进制文件

pigfly

use IO::File;

$fieldsfile1 = "a";


open($IN,"<:raw ",$fieldsfile1) or die "cannot open $fieldsfile1 !\n";
binmod($IN);

while(!eof $IN)

{

my $pp = getc($IN);


print $pp;

}

close($IN) or die "cannot close\n";

这段代码报binmod出错。各位帮帮忙看看问题在哪！谢谢

apile

binmode

pigfly

用了。但是用binmode 与不用binmode 没什么区别。
我的目的就是想把二进制文件转换成文本文件

Namelessxp

pack

pigfly

能给出程序的源代码吗？
学习，学习！

angleeye

open($IN,"<:raw ",$fieldsfile1) 不能加 :raw

pigfly

不加也一样。
希望phus大侠能贴出处理的源代码。

pigfly

好，谢谢！

nli_224

楼主的binmod写错了吧？当然会报错。貌似应该为binmode吧