JPEG::JFIF - JFIF/JPEG tags operations.
JFIF.pm v 0.11
0.11 - added function getdata_all to retrieve all data as hash from file and some new fields (by Viljo Marrandi) 0.10 - rewrite code to support older and newest Adobe Photoshop JPEG/JFIF formats, and to have better API. 0.9.3 - another rule to workaround for that stupid 0x00 in APP14 (I couldn't find it in JFIF documentation) 0.9 - fix caption add 0x00 in some situations. I don't know what it is, But have to be. 0.8 - can set comment (Caption) tag correctly (hihi) 0.7 - can read all metatags
This module can read additional info that is set by Adobe Photoshop in jpeg files (JFIF/JPEG format)
This module can read additional info that is set by Adobe Photoshop in jpeg files (JFIF/JPEG format)
Available sections name for getdata(name) are :
object_name
urgency
category
supplemental_categories
photostation_ident
keywords
special_instructions
byline_title
created_time
photostation_orig
byline
city
province_state
country_name
original_transmission_reference
headline
credit
source
copyright_notice
caption
caption_writer
photostation_note
photostation_info
#!/usr/bin/perl
use JPEG::JFIF;
use strict;
my $jfif = new JPEG::JFIF;
# this give you "caption" tag content.
$jfif->read("file.jpg");
print $jfif->getdata("caption");
Copyright 2002 Marcin Krzyzanowski
Marcin Krzyzanowski <krzak at linux.net.pl>
http://hakore.com
Download : JFIF-0.11.tar.gz