从perl的网站获取图片

Question

我正在寻找一种从网站上保存图片的好方法。我给了你的照片网址。在Perl中保存图片的标准方法是什么？考虑将它们保存为数组或.jpg文件中的字符串。 （哪一个更好？）而且，我需要修改文件名的功能。感谢您的所有帮助。

Answer 1

嗯，我想标准方法如下：首先，你获取远程图片的内容，然后将这些内容保存在你喜欢的任何名称（和路径）下。

这可以通过多种方式完成，我认为最简单的方法就是使用简单明了的CPAN模块LWP::Simple：

use strict; 
use warnings; 
use LWP::Simple;

my $url = 'here goes some url'; 
my $file = 'here goes a filename'; 

getstore($url, $file);

嗯，就是这样。 ）是的，那很简单。当然，它可能会装饰一些错误检查（和相关的消息），但对于最简单的任务应该是足够的。

甚至更好，它可以简化为单行：

perl -MLWP::Simple -e 'getstore("http://google.com/", "~/have/grabbed/the.internets")'