Image::Info::XBM - XBM support for Image::Info
use Image::Info qw(image_info dim);
my $info = image_info("image.xbm");
if (my $error = $info->{error}) {
die "Can't parse image info: $error\n";
}
my $color = $info->{color_type};
my($w, $h) = dim($info);
This modules supplies the standard key names except for Compression, Gamma, Interlace, LastModificationTime, as well as:
image_info is invoked
as image_info($file, L1D_Histogram=>1). The range is from 0 to 1.
This module requires Image::Xbm
For more information about XBM see:
http://www.dcs.ed.ac.uk/home/mxr/gfx/2d/XBM.txt
Jerrad Pierce <belg4mit@mit.edu>/<webmaster@pthbb.org>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.