Mail Index
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [ApacheGallery] ExifData
If you want it in, check to see if the label we're on is ISOSpeedRating,
if it is, and the Model field =~ /Canon/, then this will print the
ISO, assuming the Image::Info is in $info.
my $iso = (ord(substr($info->{"MakerNote"},182,1)) + 256 *
ord(substr($info->{"MakerNote"},183,1)))."\r\n";
if ($iso == 19) { print "ISO: 400"; }
elsif ($iso == 18) { print "ISO: 200"; }
elsif ($iso == 17) { print "ISO: 100"; }
elsif ($iso == 16) { print "ISO: 50"; }
elsif ($iso == 15) { print "ISO: Auto"; }
This worked for the G2 sample images off canon's site.
Hope this helps.
On Sun, 19 May 2002, Thomas Eibner wrote:
> On Sat, May 18, 2002 at 09:49:43PM -0400, Charles Chao wrote:
> > Yah I have a canon G2 camera and it seems the ISOSpeedRatings doesn't
> > work for it. I had an Olympus camera before and that looks like it
> > works fine.
> > Guess I'm stuck here until we change from Image::Info to something else,
> > hehe.
>
> Maybe we should make it optional wheter you'd want to use Image::Info
> or make a wrapper for libexif. What do you think Michael?
>
> Or should we just make something like Image::EXIF as a perl library
> for libexif and then use that?
>
> --
> Thomas Eibner <http://thomas.eibner.dk/> DnsZone <http://dnszone.org/>
> mod_pointer <http://stderr.net/mod_pointer> <http://photos.eibner.dk/>
> !(C)<http://copywrong.dk/> <http://apachegallery.dk/>
> Putting the HEST in .COM <http://www.hestdesign.com/>
>
> ---------------------------------------------------------------------
> Apache::Gallery users mailinglist. http://apachegallery.dk/
> To unsubscribe, e-mail: users-unsubscribe@xxxxxxxxxxxxxxxx
>
---------------------------------------------------------------------
Apache::Gallery users mailinglist. http://apachegallery.dk/
To unsubscribe, e-mail: users-unsubscribe@xxxxxxxxxxxxxxxx