Ciao, devo incollare un'immagine sopra ad un'altra, ho trovato questo script in giro
codice:
#!/usr/bin/perl
use Image::Magick;
my $image1 = Image::Magick->new;
my $image2 = Image::Magick->new;
$image1->Set(size=>'420x300'); # finite size, speeds up read # original image
$image2->Set(size=>'150x100'); # finite size, speeds up read # watermark
$image1->Read("bg.jpg");
$image2->Read("thm.jpg");
$image1->Composite(image => $image2,
compose=>"Over",
gravity=>"Center");
$image1->Write("01-NEW.jpg");
l'output che mi da è uguale bg.jpg...senza thm.jpg...qualche idea?
grazie