#!/usr/bin/perl use warnings; use strict; use Image::Magick; my $x; my $null=Image::Magick->new; my $img=Image::Magick->new; $null->Set(size=>'20x20'); $x=$null->ReadImage('xc:blue'); warn "$x" if "$x"; $img->Set(size=>'640x470'); $x=$img->ReadImage('1z-squatch.gif'); warn "$x" if "$x"; $img->Composite(image=>$null, compose=>'Atop', gravity=>'Center', ); $img->Write("$0.gif");
In reply to Re: ImageMagick - composite
by zentara
in thread ImageMagick - composite
by ultranerds
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |