Problem resizing image in Image::Magick

[BenRussell]

Im am trying to resize an image (already on the server) to 120 pixels wide and 60 pixels high (120 x 60).

I am trying this right now (Note: '$realFile' is the path to the file including the filename):

# Load Image::Magick
use Image::Magick;

my($image, $status);

$image = new Image::Magick;

# Read the image
$status = $image->Read("$realFile");
if ($status) { print "Error: $status"; exit; }

# Resize the image
$image->Set(geometry=>'120x60');

# Save the image
$status = $image->Write("$realFile");
if ($status) { print "Error: $status"; exit; }

And this does absolutely nothing to the file, but yields no errors either. - Ben

 

[BenRussell]

Could someone please help me on this? - Ben

 

[rosenk]

[tt]# Resize the image
$image->Set(geometry=>'120x60');[/tt]

should be:
[tt]# Resize the image
$image->Resize(geometry=>'120x60');[/tt]

 

[BenRussell]

Got it working.
I had to use this however:

$image->Resize(width=>'120', height=>'60');

Because

$image->Resize(geometry=>'120x60');

wouldn't seem to work for some reason. - Ben