## Wasserzeichen/Logo
$pic2 = Image::Magick->new;
$result    = $pic2->ReadImage('wz.png');
warn "$result" if "$result";
$result    = $pic2->Resize(width => 100, height => 50); # auf andere Größe 
warn "$result" if "$result";
$result    = $pic2->Crop(width => 30, height => 10); # Zuschneiden
warn "$result" if "$result";

# Bild zusammensetzen
$endpic = $pic1->Clone();
# zu offsets siehe <http://www.imagemagick.org/script/command-line-processing.php#geometry>
$result = $endpic->Composite(
    image    => $pic2,
    compose  => 'over',
    geometry => '+600+200', # an Pos 600/200 einfügen
);
warn "$result" if "$result";