2012-09-24 44 views
3

需要帮助perl imagemagick!png在perl imagemagick中的水印,使png透明

我试图把PNG水印的jpg图片,

$image = Image::Magick->new; 
$image->Read('image_filename'); 

$logo = Image::Magick->new; 
$logo->Read('watermark_filename'); 

$logo->Transparent(color=>'#FFFFFF'); 
$image->Composite(image=>$logo, gravity=>'southeast', geometry=>'-10-10'); 
$image->Write('final_filename'); 

一切正常,但我需要我的水印是透明的,当我试图不透明度=>“50%”它的工作原理,但水印png开始看起来像s ... t :))

+0

如果您正在从文件读取水印,为什么不将水印文件存储为已经透明的图像?它可能会消除这个问题。而越少,你必须以更好的方式编程。 – dan1111

+1

当然,它会消除这个问题,但我需要知道正确的解决方案!:)如何正确地更改透明PNG的不透明度,由perl imagemagick? – voodoo

+0

够公平的。只是想着解决您的问题。 – dan1111

回答

0

您是否考虑过使用GIMP或perlgrammaticly通过GD创建水印?

+0

抱歉,长时间回复,水印是在GD中创建的! – voodoo