Image::ExifToolの使い方

use strict;
use Image::ExifTool qw(:Public);
use Data::Dumper;

my $exifTool = new Image::ExifTool;
print Dumper($exifTool->ExtractInfo("image.jpg"));

Leave a Reply