PerlMagick исключения

Я новичок в Perlmagick, и я пытаюсь этот простой код на моем MAC:

#!/usr/local/bin/perl
use Image::Magick;

my($image, $x);

$image = Image::Magick->new;
$x = $image->Read('cv.png');
warn "$x" if "$x";

$x = $image->Crop(geometry=>'100x100+10+10');
warn "$x" if "$x";

$x = $image->Write('x.png');
warn "$x" if "$x";

Но я получил эту ошибку:

Исключение 400: сбой выделения памяти `cv.png' @error/png.c/ReadOnePNGImage/2109 в строке image.pl 8.

В чем здесь проблема?

0 ответов

Другие вопросы по тегам