perl - Perl を使用して画像を拡大、サイズ変更、またはサムネイル化する

Question

Perl スクリプトを使用して (任意の形式の) 画像を拡大またはサイズ変更するにはどうすればよいですか?

Answer 1

マシンに imlib2 をインストールできる場合は、Image::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をご覧ください。

Answer 2

Image::Resizeを使用できます。