Как использовать объект, полученный из Perl's Image :: MetaData :: JPEG?

Question

Я использую модуль Image :: MetaData :: JPEG для чтения информации заголовка изображения. У меня есть следующее:

my @files = </dir/*jpg>;

for (@files) {

my $image = new Image::MetaData::JPEG( $_ ) or die $!;
print $image . "\n"; 
} 

Возвращает «Image :: MetaData :: JPEG = HASH (0x189b218)».

Я прочитал модуль, но как мне получить информацию заголовка в удобном для использования формате?

Answer 1

print $image печатает представление объекта вместе с его хеш-адресом.

Прочтите документацию , чтобы увидеть, что вам нужно.

Попробуйте print $file->get_description();