Image::Info::TIFF - multi-page tiff images page count

by **ifiaz** » Thu, 20 Nov 2003 00:52:45 GMT

How can I get a page count of a multi-page .tif image.

I browsed in CPAN, but I can't find the TIFF.pm.

Is there any way to get the page count in perl?

If not, what is the easiest way to do it using C, etc.?

Could someone give me the easiest steps to do it as I am quite
new to perl and programming?

Just a side question:
Is tiff the only format that supports multi-page images,
or are there any other and if any, what are those?

Thank you.

by **Martien Verbruggen** » Thu, 20 Nov 2003 14:25:55 GMT

On 18 Nov 2003 07:52:45 -0800,



Image::TIFF is part of the Image-Info package. If you install the
package, you'll have it. You can't, or at least shouldn't, ever try to
get separate files out of a distribution.

However, I don't think that that supports multi-image formats (I might
be wrong. I haven't actually tried it, just browsed the documentation).


Image::Magick will be able to tell you this. You open the image as an
IM object, and then you just count the number of elements in it.


Probably also with the ImageMagick libary, or maybe directly with the
freely available tiff library (www.libtiff.org), possibly already on
your system, depending on your OS and vendor.


Lessee..

#!/opt/perl/bin/perl
use strict;
use warnings;
use Image::Magick;

# Create a multi-image TIFF document
{
    my $im = Image::Magick->new();

    # Read some JPG images
    my $rc = $im->Read(glob("/tmp/P*.JPG"));
    die $rc if $rc;

    # Save the whole thing as a TIFF file
    $rc = $im->Write("foo.tiff");
    die $rc if $rc;
}

# Read the TIFF document
{
    my $im = Image::Magick->new();
    my $rc = $im->Read("foo.tiff");
    die $rc if $rc;

    # An Image::Magick object is just a reference to an array, with
    # each element an image.
    my $n_images = @$im;
    print "I've got $n_images images\n";
}

Note that Image::Magick generally relies on an external tiff library
to write and read images.


Photoshop, MNG, ImageMagick's MIFF format, GIMP XCF, GIF, PostScript,
PDF, FAX, FITS (I believe), The various Flash and Macromedia formats,
MPEG, and many others. Not all of these are pure image formats or even
mainly image formats, and what a "frame/page/image/layer" in each of
these means is often application dependent. In fact, what multiple
images in a single TIFF document mean is dependent on the encoding and
context.

Martien
-- 
                        | 
Martien Verbruggen      | We are born {*filter*}, wet and hungry. Then
Trading Post Australia  | things get worse.
                        |

by **ifiaz** » Fri, 21 Nov 2003 11:22:11 GMT

> Image::Magick will be able to tell you this. You open the image as an
 

Thanks for your suggestions.

I am using Mac OS X, 10.2.8 with perl 5.6.0.

As I don't have Image::Magick in the /System/Library/Perl, I tried to download
it from the CPAN website for PerlMagick-5.57.tar.gz. After the download
completes, I can't follow the instructions from the README.

First hurdle:

local.:~/Desktop/PerlMagick-5.57> perl Makefile.PL
Checking if your kit is complete...
Looks good
Note (probably harmless): No library found for -lMagick
Note (probably harmless): No library found for -llcms
Note (probably harmless): No library found for -lexif
Writing Makefile for Image::Magick

And afterwards I typed 'make' and lots of errors.

 I have no idea how I can have it installed in my system.

If anyone can assist, please...

by **Martien Verbruggen** » Fri, 21 Nov 2003 13:05:18 GMT

On 19 Nov 2003 18:22:11 -0800,



You need the ImageMagick library first. The best thing to do is
download the complete IMageMagick distribution from imagemagick.org,
and install the Perl module from that distribution. That way you have
it all in sync.

Maybe you can get some precompiled stuff from whoever provided Perl
for you? Does Apple have their own repository? 

That said, I don't really know whether it is supported on MacOSX. The
documentation seems to suggest that the Unix source should work on
MacOS 10.

Start with unpacking the source, run configure --without-perl (and
whatever other options you need) and make, and install. Change to the
PerlMagick directory, run perl Makfile.PL, make, make test and make
install.

Martien
-- 
                        | 
Martien Verbruggen      | 
Trading Post Australia  | Curiouser and curiouser, said Alice.
                        |

Image::Info::TIFF - multi-page tiff images page count

Image::Info::TIFF - multi-page tiff images page count

Jump to:

Next

Image::Info::TIFF - multi-page tiff images page count

Re: Image::Info::TIFF - multi-page tiff images page count

Re: Image::Info::TIFF - multi-page tiff images page count

Re: Image::Info::TIFF - multi-page tiff images page count

Similar Threads:

Who is online