[PerlChina] Re: 请教一个关于read函数的问题

恩，明白了，多谢~~

 

：）

2009-05-12

---

lee.li

---

发件人： Anthony WU

发送时间： 2009-05-11  21:14:04

收件人： perlchina

抄送：

主题： [PerlChina] Re: 请教一个关于read函数的问题

使用 binmode 看看

open my $fh, '<', $path

    or die "Can not open!\n";

binmode ($fh);

-------- Original Message --------

Subject: [PerlChina] 请教一个关于read函数的问题

From: lee.li@a8.com

To: PerlChina Mongers 讨论组 <perlchina@googlegroups.com>

Date: 11/5/2009 17:50

> 请教大家一个问题：使用read函数无法读取指定大小字节的内容，而是比指定的字节要小

>

> my $path = 'E:\English Study\Song\Blowing in the Wind.mp3';

> open my $fh, '<', $path

>     or die "Can not open!\n";

>

> my $content;

> print read($fh, $content, 5000000), "\n";

>

> print的大小只有1450，而歌曲的大小有5M多，读取mp4、pdf文件的时候也会有这种情况，请问一下这是怎么回事？

> >

>   

-- 

Best Regards,

Anthony WU

--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
 要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
 要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛

-~----------~----~----~----~------~----~------~--~---