请教binmode函数

kexinqw

请教下各位高人，如何用perl进行二进制模式读写文件：选一个图片文件，用binmode模式将文件内容读出来保存到另一个文件。谢了！！

iamlimeng

自己看文档。

这个需求似乎用COPY更好！

kexinqw

什么文档啊，请明示啊。小弟才入门，不要说的那么高深啊。

suautotest

我也同问啊。。。

zhlong8

所有文档不加说明都是指的 perldoc

Crisewng

1. #!/usr/bin/perl
   
2. 
   
3. use warnings;
   
4. use strict;
   
5. 
   
6. binmode STDOUT;
   
7. 
   
8. open FILE,'<','/home/crise/nig.png' or die "Can't open file";
   
9. 
   
10. open STDOUT,'>','a.png';
    
11. 
    
12. while (my $buf = <FILE> ){
    
13.     print $buf;
    
14. }
    
15. 
    
16. close(FILE);

复制代码

像这样的吧 。

兰花仙子

回复 1# kexinqw


    Unix下都不需要binmode，直接像普通文件一样读写。

moon_lucifer

perldoc -f binmode