The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

JPEG::JFIF - JFIF/JPEG tags operations.

VERSION

JFIF.pm v. 0.12

CHANGES

 0.12 - Closed ticket #40161
 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

SYNOPSIS

This module can read additional info that is set by Adobe Photoshop in jpeg files (JFIF/JPEG format)

DESCRIPTION

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

EXAMPLE

        #!/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 AND LICENCE

Copyright 2002-2008 Marcin Krzyzanowski Licence : Lesser General Public License v. 2.0

AUTHOR

Marcin Krzyzanowski <krzak at hakore.com> http://www.hakore.com/