Como posso redimensionar uma imagem para a área ajuste com o Image :: Magick?
-
23-08-2019 - |
Pergunta
A partir da linha de comando com imagemagick, você pode usar:
convert dragon.gif -resize 64x64^ -gravity center -extent 64x64 fill_crop_dragon.gif
para redimensionar e recortar uma imagem para que ele preenche a área, tanto quanto possível.
Como posso fazer isso a partir Imagem do Perl :: Magick ?
Solução
#!/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' );
Consulte a documentação do PerlMagick .
Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow