可以在Perl中编写一个打开不同URL的脚本并保存每个脚本的截图？
解决方法
您可以使用
WWW::Mechanize::Firefox来控制Firefox实例，并使用$ mech-> content_as_png转储呈现的页面。
请注意，设置它可能会构成相当大的挑战。
如果所有这些都按预期工作，您可以简单地使用这样的脚本转储所需网站的图像，但是您应该启动Firefox并手动将其调整到所需的宽度(高度无关紧要，WWW :: Mechanize :: Firefox总是转储整个页面)。
use WWW::Mechanize::Firefox;
use Path::Class qw/file/;
my $mech = WWW::Mechanize::Firefox->new(
bufsize => 10_000_000,# PNGs might become huge
);
$mech->get('http://www.stackoverflow.com/');
my $fh = file( 'test.png' )->open( '> :raw' );
print $fh $mech->content_as_png();</code></pre>