JPEGファイルの情報取得
Image::MetaData::JPEGモジュールを使うと取得できます。
use strict;
use Image::MetaData::JPEG;
my $file = 'image.jpg';
my $image = Image::MetaData::JPEG->new($file);
unless ($image) {
die Image::MetaData::JPEG::Error();
}
print $image->get_description();
関連項目
・画像の大きさの取得・JPEGファイルの生成機器取得
・JPEGファイルの撮影日時取得
・JPEGの画像の大きさ取得
