Image::Magick module sample program code and steps for Windows?

[gube]

Dear monks,

I have asked the question before How to resize picture in windows?. Each of them answered in very different way many thanks for their ideas. And José Ramón Martínez, ask to reply the code when it works. Yeah, you may download ImageMagick-6.2.3-6-Q16-windows-dll.exe from the path http://www.imagemagick.org/script/binary-releases.php#windows and install it in your windows, while installing there is an option in checkbox Install PerlMagick for ActiveStatePerl check it and install it will automatically install with module in your system. Than, try the below code to resize the image. Congrats, to all. And thanks to astroby to give me a installer link.

   use Image::Magick;    
   my($image, $x);    
   $image = Image::Magick->new;    
   $x = $image->Read('Images.jpg');       
   warn "$x" if "$x";    
   $x = $image->Crop(geometry=>'200x50');    
   warn "$x" if "$x";    
   $x = $image->Write('x.png'); 
   warn "$x" if "$x";

Reparented by davido per consideration.