我一直在研究一个从网站检索网站图标的脚本,现在大部分都在工作,但我遇到了一个巨大的障碍。当我在 Perl 中调用 ImageMagick 模块时,它似乎不知道如何处理古老的 favicon.ico 文件(当站点具有非 ICO 图标时,一切都很好)。我可以找到很多关于转换为ICO 以创建网站图标的信息,但没有太多关于从ICO 转换的信息。
检索到 favicon 后,我使用 PerlMagick 的 ping 函数来确定我正在处理的文件类型(因此我不依赖图标的服务器来准确报告):
use Image::Magick;
my $im = Image::Magick->new();
my ($width, $height, $size, $format) = $im->Ping( $saveFile );
当文件是 ICO 文件时,$format
返回为空(我请求它的服务器将其报告为image/x-icon
)。我还有一个小子程序,可以为我下载的所有内容创建 JPEG 缩略图。它适用于非 ICO 文件,但 ImageMagick 在从 ICO 转换时会创建一个空白文件:
open my $file, $params->{'openFile'};
my $imageData = do { local $/; <$file> };
my $image = Image::Magick->new;
$image->BlobToImage($imageData);
$image->SetAttribute(quality => 80);
$image->SetAttribute(compression => 'JPEG');
$image->SetAttribute(geometry => $thumbnailWidth . "x" . $thumbnailHeight);
$image->Thumbnail();
my $thumbnailData = $image->ImageToBlob();
open(my $file, '>', $params->{'saveFile'}) or die "Could not open file '" . $params->{'saveFile'} . "'.";
print $file $thumbnailData;
close $file;
我是否需要以某种方式诱使 ImageMagick 识别该文件?我一直在保存我下载的网站图标,并且初始文件是有效的 ICO,即使 ImageMagick 无法识别它。
更新:这是一个正在运行的 ico 文件的链接。但是,我尝试过的所有 ico 文件都已生效。
如果我尝试使用命令行 ImageMagickconvert
工具,结果如下:
[root@local favicons]# convert 1299 1299-jpg.jpg
convert: no decode delegate for this image format `' @ error/constitute.c/ReadImage/564.
convert: no images defined `1299-jpg.jpg' @ error/convert.c/ConvertImageCommand/3235.