SYNOPSIS
use Image::EXIF;
use Data::Dumper;
my $exif = Image::EXIF->new($file_name);
# or:
my $exif = Image::EXIF->new;
$exif->file_name($file_name);
my $image_info = $exif->get_image_info(); # hash reference
my $camera_info = $exif->get_camera_info(); # hash reference
my $other_info = $exif->get_other_info(); # hash reference
my $point_shoot_info = $exif->get_point_shoot_info(); # hash reference
my $unknown_info = $exif->get_unknown_info(); # hash reference
my $all_info = $exif->get_all_info(); # hash reference
print Dumper($all_info);
DESCRIPTION
Perl package Image::EXIF based on exiftags by Eric M. Johnston: <http://johnst.org/sw/exiftags/>.AUTHORS
- Aaron Crane <[email protected]> (current maintainer)
- sergey s prozhogin <[email protected]>