Perl 模块 Image::Imlib2 保存 gif 时遇到问题

Question

我正在使用 perl 模块 Image:Imlib2 来调整照片大小。代码如下：

#create thumbnail
my $old = Image::Imlib2->load("$upload_dir/$name");
my $new = $old->create_scaled_image(80, 80);
$new->save("$upload_dir/$thumbnail_name");

当我保存 jpg 或 png 文件时，此代码工作正常，但每当我保存 gif 时，都会收到内部服务器错误。这是我在 apache 日志文件中收到的错误：

Image::Imlib2 save error: Unknown error at /path/to/script/script.pl

有什么想法吗？

谢谢！

Answer 1

我认为 Imlib2 根本不支持编写 GIF 文件。来自相当旧的邮件列表帖子：

我发现 Imlib2 完全不支持写出 gif 文件。

此外，如果您查看源代码，您会看到几个感兴趣的文件：

• imlib2-1.4.5/src/modules/loaders/loader_png.c
• imlib2-1.4.5/ src/modules/loaders/loader_gif.c

在 loader_png.c 中，您会发现：

char
load(ImlibImage * im, ImlibProgressFunction progress,
     char progress_granularity, char immediate_load)
{
    /*...*/
}

char
save(ImlibImage * im, ImlibProgressFunction progress, char progress_granularity)
{
    /*...*/
}

在 loader_gif.c 中，您会发现：

char
load(ImlibImage * im, ImlibProgressFunction progress, char progress_granularity,
     char immediate_load)
{
    /* ... */
}

但是没有save实现。所以看起来 Imlib2 可以读取 GIF 但不能写入它们，这就是你的麻烦所在。

我建议您切换到 GraphicsMagick 和 Graphics::Magick。 GraphicsMagick 是 ImageMagick 的一个分支，速度更快且错误更少，这是 Flickr 内部使用的，所以它应该足够适合您。不幸的是，GraphicsMagick 使用了有点奇怪的 ImageMagick API，但是您可以轻松地将丑陋的细节隐藏在包装器后面。

或者，将所有缩略图保存为 JPEG 或 PNG。