如何使用Perl的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打印对象的表示及其哈希地址。

阅读the documentation以了解您的需求。

尝试print $file->get_description();