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の画像の大きさ取得