Imagerでjpgをサポートさせるためにここのdmgを入れる必要があった気がする。

よね？

use Imager;

my $read_image = Imager->new;

my $image_source = "20080901152.jpg";
$read_image->read(file=>$image_source)
  or die "Cannot load $image_source: ", $read_image->errstr;

my $scaled_image = $read_image->scaleX(pixels=>100)->scaleY(pixels=>100);

$read_image->compose(src=>$scaled_image,
                   tx=>250,       ty=>10);

$read_image->write(file=>'test.jpg')
  or die 'Cannot save test.jpg: ', $read_image->errstr;

composeとかblendもできるのでやりたい事はできそう。