Hi!
I don't know if this belongs to fink or ImageMagick, but
i've tried to
use the examples from:
htt
p://www.imagemagick.org/script/perl-magick.php
with the following results (and I did not manage to read an
image from
a filehandle and to store it again).
I think especially the assertion should not appear.
perl is: (revision 5.0 version 8 subversion 1 RC3)
ImageMagick is:ImageMagick 6.1.8 03/14/05 Q16
OS X is: X.3.9
Greetings,
Marcus
----------8<-----------
#!/usr/bin/perl -w
require 5.002;
use warnings;
use strict qw(vars subs);
use Image::Magick;
my $image1 = Image::Magick->new;
my $image2 = Image::Magick->new;
my $x;
# This produces:
# Exception 435: unable to open image `': No such file or
directory at
./test.pl line 16.
# Exception 410: no images defined `%s' (Crop) at ./test.pl
line 24.
$x = $image1->Read('test.gif');
warn "$x" if "$x";
open(IMAGE, 'test.gif') or die $!;
# This produces:
# magick/hashmap.c:1619: failed assertion
`hashmap_info->signature ==
MagickSignature'
$image2->Read(file=>*IMAGE);
close(IMAGE);
$x =
$image1->Crop(geometry=>'100x100"+100"+100')
;
warn "$x" if "$x";
$x = $image1->Write('x.png');
warn "$x" if "$x";
_______________________________________________
Magick-bugs mailing list
Magick-bugs imagemagick.org
http://studio.imagemagick.org/mailman/listinfo/magick-
bugs
|