logo标签列表

如何使用Image::Magick调整图像大小以适应区域？

perlimagemagickresize-image
6

使用命令行和imagemagick，您可以使用以下命令：

convert dragon.gif -resize 64x64^ -gravity center -extent 64x64 fill_crop_dragon.gif

如何使用Perl的Image::Magick来调整大小并裁剪图像，使其尽可能填充区域。

1个回答
16
#!/usr/bin/perl

use strict;
use warnings;

use Image::Magick;

my $image = Image::Magick->new;
$image->read('test.jpg');

$image->Set( Gravity => 'Center' );
$image->Resize( geometry => '64x64' );
$image->Extent( geometry => '64x64' );
$image->Write( 'test-out.jpg' );

参见 PerlMagick 文档。

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文，
原文链接