QUOTED_MESSAGE: > On Sun, Dec 09, 2007 at 09:24:52PM -0800, William Kern > wrote: [SNIP] > > Hi, > > You need to create an Imager object for the source > image too: > > #!/usr/bin/perl > use strict; > use warnings; > use Imager; > my $source="source.gif"; my > $original="original.gif"; # load the > image > my $Simage = Imager->new; $Simage->open(file > => $source) >   or die "Could not open $source: > ", $Simage->errstr; my $Rimage = > Imager->new; > $Rimage->open(file => "$original") or > die $Rimage->errstr; my $left = 10; > my $top = 5; > # use the loaded image instead the filename as the > source $Rimage->paste(left => $left, top => $top, > img => $Simage); $Rimage->write(file=>'result.gif'); > exit;

  EKKI skrifa neitt hér: