I've been banging my head against a wall trying to use Image::Magick
to generate jpeg compressed thumbnails.
Here's latest iteration of the code I've been using;
my $image = Image::Magick->new;
Basically, I'm trying to read a source image, resize to 400x300 and
write that, then resize to 100x75 and then write that. I notice that
the typical filesize I get for the 400x300 image is between 50-60k,
however the filesize for the thumbnail is roughly 25k. Using
Paintshop Pro I can produce compressed images of around 5k.