composite ist eigentlich richtig...
Ich habe mir für sowas mal ein Skript geschrieben...
Code:
#!/usr/bin/perl -w
use Image::Magick;
use strict;
my $Path = '/home/msprick/pics/raw';
my $Watermark = '/home/msprick/wmark.png';
my $Position = 'NorthEast';
opendir(DH,$Path) or die $!;
my @Files = grep { !/^\./ && -f "$Path/$_" } readdir(DH);
closedir(DH);
my $wm = Image::Magick->new();
$wm->Read("$Watermark");
foreach my $Filename (@Files)
{
my $image = Image::Magick->new();
$image->Read("$Path/$Filename");
$image->Composite(compose=>"Atop",image=>$wm,gravity=>"$Position");
open(OUT,">$Path/$Filename");
$image->Write(file=>"OUT");
close(OUT);
print "Merged \"$Watermark\" into \"$Filename\"\n";
}
Die Pfade oben musst Du anpassen und die Position natürlich auch...
Das funktioniert so, daß alle Dateien in $Path dieses Wasserzeichen bekommen.
Achte deshalb darauf, dass nur Bilder in dem Verzeichnis liegen.
Das Wasserzeichen selbst sollte außerhalb von $Path liegen, sonst machst Du das Wasserzeichen nämlich auch dort rein...
Lesezeichen