Comment utiliser l'objet obtenu de Perl's Image :: MetaData :: JPEG?

Question

J'utilise le module Image :: MetaData :: JPEG pour lire les informations d'en-tête d'une image. J'ai ce qui suit:

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

for (@files) { 

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

Cela renvoie "Image :: MetaData :: JPEG = HASH (0x189b218)".

J'ai lu le module mais comment puis-je obtenir les informations d'en-tête dans un format utilisable?

Answer 1

print $image Imprime la représentation de l'objet avec son adresse de hachage.

Lisez the documentation pour voir ce dont vous avez besoin.

Essayez print $file->get_description();