Resizing Images

[kennygadams]

Hello Everyone,

I would normally use system calls to create thumbnail images from the originals, but my new server with yahoo does not support them because of security reasons.

This server does support ImageMagick but I cant seem to get IM to create a thumbnail sized image. Can any of you see any obvious problems with the code below? or suggest a better way of doing this?

#!/usr/bin/perl

require ('cgi-lib.pl'); 
&ReadParse;

use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
use Image::Magick;

$full_path_to_the_ORIGINAL_image=Image::Magick->new;
$base_path_to_THUMBNAIL_image = $full_path_to_the_ORIGINAL_image->Crop('100x100+0+0');

Thanks,


Kenny Adams

http://www.acclaimimages.com/