为什么用Perl的LWP下载我的图像会给我一个错误大小的文件?

栏目: Perl · 发布时间: 6年前

内容简介:翻译自:https://stackoverflow.com/questions/926457/why-does-my-image-download-with-perls-lwp-give-me-the-wrong-sized-file

我试图使用 Perl 从HTTP服务器获取图像.

我有该文件的完整URL,我正在尝试使用

my $data = LWP::Simple::get $params{URL};
my $filename = "image.jpg";
open (FH, ">$filename");
print FH $data;
close (FH);

现在,从逻辑上讲,至少对我来说,这应该有效.但文件大小略有不同,我无法解决原因.

救命!

您需要使用 binmode

将图像数据正确写入磁盘.

my $data = LWP::Simple::get $params{URL};
my $filename = "image.jpg";
open (FH, ">$filename");
binmode (FH);
print FH $data;
close (FH);

否则它被解释为文本,并且换行符被释放.

翻译自:https://stackoverflow.com/questions/926457/why-does-my-image-download-with-perls-lwp-give-me-the-wrong-sized-file


以上就是本文的全部内容,希望本文的内容对大家的学习或者工作能带来一定的帮助,也希望大家多多支持 码农网

查看所有标签

猜你喜欢:

本站部分资源来源于网络,本站转载出于传递更多信息之目的,版权归原作者或者来源机构所有,如转载稿涉及版权问题,请联系我们

让创意更有黏性

让创意更有黏性

[美] 奇普·希思、[美] 丹·希思 / 姜奕晖 / 中信出版社 / 2014-1-8 / 49.00元

你或许相信在太空中唯一能看到的人工建筑就是万里长城,可乐能腐蚀人体骨骼,我们的大脑使用了10%;与此同时,你却记不得上周例会上领导的安排,昨天看过的那本书里写了什么,上次参加培训的主要内容…… 为什么? 这就引发出《让创意更有黏性》的核心问题:什么样的观点或创意具有强有力的黏性,能被他人牢牢记住? 国际知名行为心理学家希思兄弟根据大量的社会心理学研究案例,揭示了让创意或观点具有黏......一起来看看 《让创意更有黏性》 这本书的介绍吧!

图片转BASE64编码
图片转BASE64编码

在线图片转Base64编码工具

URL 编码/解码
URL 编码/解码

URL 编码/解码

RGB CMYK 转换工具
RGB CMYK 转换工具

RGB CMYK 互转工具