使用Perl拉伸、调整图像大小或缩略图像

如何使用Perl脚本拉伸或调整图像（任何格式）的大小？

您可以使用。

我建议使用image:：Imlib2。。。如果您可以在计算机上安装imlib2

见文件：

---

如果您无法安装imlib2，请查看

，您可能会对这样的问题感兴趣。您可能会对stackoverflow上的任何问题进行谷歌搜索。但你也可以在这里问。谷歌在这里帮不了什么忙，因为有太多的解决方案，很难找到真正好的解决方案。我很高兴有人问我这些问题。因为到现在为止，我总是使用带有GD的Image:：Resize，而且（对我来说）总是一团糟。图片：：Imlib2更适合我的需要！是 啊酷而简单。：）我不想给出这个，因为有些人可能没有/不想安装库，如果你使用GD，它是一个很好的界面。如果您需要额外安装GD只是为了制作一些缩略图，我不推荐它。我在新版本上安装GD时遇到了几个问题。。。这打破了我的密码。

use Image::Imlib2;

# load image from file
my $image = Image::Imlib2->load("in.png");

# get some info if you want
my $width  = $image->width;
my $height = $image->height;

# scale the image down to $x and $y
# you can set $x or $y to zero and it will maintain aspect ratio
my $image2 = $image->create_scaled_image($x,$y);

# save thumbnail to file
$image2->save("out.png");