hi,
#!/usr/bin/perl
use Image::Magick;
my($image, $x);
$image = Image::Magick->new;
$x = $image->Read("y.jpg");
warn "$x" if "$x";
$x = $image->Crop(geometry=>'100x100+100+100');
warn "$x" if "$x";
$x = $image->Write('x.png');
warn "$x" if "$x";
corrent directory have y.jpg file,but i run the perl script,the stdout:
Exception 435: unable to open image `': No such file or directory at
t123.plline 8.
Exception 410: no images defined ``%s'' at t123.pl line 11.
Exception 410: no images defined ``%s'' at t123.pl line 14.
why? I sure corrent directory exists file that y.jpg
who can help me?
thanks!
_______________________________________________
Magick-users mailing list
[email protected]
http://studio.imagemagick.org/mailman/listinfo/magick-users
