I write a code but the result I expected is wrong.
#!/usr/local/bin/perl
> use Image::Magick;
>
> # The script reads three images, crops them, and writes a single image as
> a GIF animation sequence
> my($image, $x);
>
> $image = Image::Magick->new;
> $x =
> $image->Read('Bugs_Bunny.svg.png','png-clipart-bugs-bunny-witch-hazel-drawing-looney-tunes-cartoon-bugs-and-lola-bunny.png','png-transparent-bugs-bunny-in-double-trouble-looney-tunes-others.png');
> warn "$x" if "$x";
>
> $x = $image->Crop(geometry=>'100x100+100+100');
> warn "$x" if "$x";
>
> $x = $image->Write('x.png');
> warn "$x" if "$x";
>
The following error was:
Exception 420: no decode delegate for this image format `PNG' @
> error/constitute.c/ReadImage/572 at gifaninmation.pl line 9.
> Exception 410: no images defined `Crop' @
> error/Q16HDRI.xs/XS_Image__Magick__Q16HDRI_Mogrify/7824 at
> gifaninmation.pl line 12.
> Exception 410: no images defined `Image::Magick::Q16HDRI' @
> error/Q16HDRI.xs/XS_Image__Magick__Q16HDRI_Write/15195 at gifaninmation.pl
> line 15.
>
According to this article I have installed * libpng *but the error is
present.
https://legacy.imagemagick.org/discourse-server/viewtopic.php?t=14301
--
With kindest regards, William.
⢀⣴⠾⠻⢶⣦⠀
⣾⠁⢠⠒⠀⣿⡁ Debian - The universal operating system
⢿⡄⠘⠷⠚⠋⠀ https://www.debian.org
⠈⠳⣄⠀⠀⠀⠀
