Magick

[dalhousi]

Hi Everyone,

I'm trying to write some text on an picture and display this picture. I'm using Perl with the library Magick. However, it seems that it is not working. I cannot even read a picture and display it.

I used the following example code but i got nothing:

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

  my($image, $x);

  $image = Image::Magick->new;
  $x = $image->Read('1.gif', '2.gif', '3.gif');
  warn "$x" if "$x";

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

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

Anything wrong with my code?

Thanks in advance
Cheers