perl - 为什么这会停止我的 perl 应用程序包“未注册警告”

Question

我正在使用 perl 中的内部 Web 网关框架。现在我正在尝试使用 Image::Magick::Thumbnail 创建缩略图。

但是如果我有这条线

my ($thumb, $x, $y) = Image::Magick::Thumbnail::create($image, 50);

我收到以下错误。

package 'Image::Magick::Thumbnail' not registered for warnings

我已将此追踪到 warnings.pm 的第 313 行

        Croaker("package '$category' not registered for warnings")

但我不确定为什么这会停止我的程序任何想法？

Answer 1

use warnings::register;创建一个与当前包同名的警告类别。

Image::Magick::Thumbnail 检查是否Image::Magick::Thumbnail启用了类别警告，但实际上并没有使用use warnings::register;.

该行在代码中，但它被注释掉了？！您可以编辑模块以取消注释该行以解决问题。在您的脚本中包含以下内容也应该可以解决问题：

{
   package Image::Magick::Thumbnail;
   use warnings::register;
}