使用Perl拉伸,调整大小或缩放图像
发布时间:2020-12-15 21:48:38 所属栏目:大数据 来源:网络整理
导读:如何使用Perl脚本拉伸或调整图像(任何格式)? 解决方法 我推荐 Image :: Imlib2 …如果你可以在你的机器上安装imlib2 参见文档:Image::Imlib2 use Image::Imlib2;# load image from filemy $image = Image::Imlib2-load("in.png");# get some info if you w
如何使用Perl脚本拉伸或调整图像(任何格式)?
解决方法
我推荐
Image :: Imlib2 …如果你可以在你的机器上安装imlib2
参见文档:Image::Imlib2 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"); 您可能也对Image::Imlib2::Thumbnail感兴趣,如果您无法安装imlib2,请查看Image::Magick (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |