Perl读取二进制流文件

参考自：https://blog.csdn.net/u011729865/article/details/54575956

open(BIN_FP,"<",“test.bin");
open(HEX_TXT_FP,"<",“test.txt");
while(read(BIN_FP,my $buffer,1)) {
      my $hex=unpack("H*",$buffer);
       #print "$hex ";
      print HEX_TXT_FP "$hex\n";
}

用vim打开是乱码（类似下图右边的那堆符号），用十六进制显示功能如下（能看到文件第一个byte的数据是60）：

脚本执行后的输出结果：