JPEGの画像の大きさ取得

---

　Image::MetaData::JPEGモジュールを使うと取得できます。

use strict;
use warnings;
use Image::MetaData::JPEG;

my $file = 'image.jpg';
my $image = Image::MetaData::JPEG->new($file);
die Image::MetaData::JPEG::Error() unless $image;

my ($x, $y) = $image->get_dimensions();
printf "x=%d y=%d\n", $x, $y;

---

関連項目

・画像の大きさの取得
・JPEGファイルの情報取得