[Magick-bugs] when run imagemagick encounter wrong

[Darren Tao]

Hi，
As the Project's need, we choose use to use Image-Magick6.3.3，and use the PerlInterface (PermlMagic&ActivePerl5.8.8). but when I run the a pl, during the 
Linux we always encounter a wrong, the pl script listed as below:
sub image_resize {
	my ( $file, $globe_x, $globe_y ) = @_;
	my ( $status ) = "resize_ok";

	my $i = Image::Magick->new;
	$i->Read($file);


	$geometry = "geometry";
	$i->Scale(geometry=>$geometry, width=>$globe_x, height=>$globe_y);

#	print "Content-type: image/gif¥n¥n";
#	binmode(STDOUT);


#	$i->Write("gif:-");
	$i->Write($file);

	if( $! ){ $status = "resize_err" }
	return $status ;
}

The wrong message is:

Can't locate object method "Write" via package "Exception 410: no images defined `Image::Magick'" (perhaps you forgot to load "Exception 410: no images defined `Image::Magick'"?) at /dev/config/OEM/perl_module/image_resize.pl line 143.

During installing PerlMagick, I use Make Test, some was failed, but I don't why.

[root at localhost PerlMagick]# make test
/bin/sh ../magick.sh PERL_DL_NONLAZY=1 /opt/ActivePerl-5.8/bin/perl-static "-MEx      tUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t t/bzl      ib/*.t t/jpeg/*.t t/png/*.t t/ps/*.t t/tiff/*.t t/x/*.t t/xfig/*.t t/zlib/*.t
t/blob............ok
t/bzlib/read......ok
t/bzlib/write.....ok
t/composite.......ok
t/filter..........ok
t/getattribute....ok
t/jpeg/read.......ok
t/jpeg/write......ok
t/montage.........ok
t/png/read-16.....ok
t/png/read........ok
t/png/write-16....ok
t/png/write.......ok
t/ps/read.........ok
t/ps/write........ok
t/read............FAILED test 9
        Failed 1/45 tests, 97.78% okay
t/setattribute....ok
t/tiff/read.......ok
t/tiff/write......ok
t/write...........ok
t/x/read..........FAILED test 1
        Failed 1/1 tests, 0.00% okay
t/x/write.........ok
t/xfig/read.......ok
t/zlib/read.......ok
t/zlib/write......ok
Failed Test Stat Wstat Total Fail  Failed  List of Failed
-------------------------------------------------------------------------------
t/read.t                  45    1   2.22%  9
t/x/read.t                 1    1 100.00%  1
Failed 2/25 test scripts, 92.00% okay. 2/334 subtests failed, 99.40% okay.


As I am  new to perl and imagemagick. So needs ur help ,and best wishes!