添加Alpha通道的图像与PerlMagick

Question

我读的图像读取不具有Alpha通道：

my $image = Image::Magick->new; 
$image->Read("./noalpha.png"); 

然后尝试某些像素设置为不同的颜色/ alpha值：

my @color = (0.2, 0.4, 0.6, $alpha); 
$image->SetPixel(x=>$X, y=>$Y, channel=>'RGBA', normalize=>'True', color => \@color); 

但除非启动镜像文件已经有一个alpha通道我写的文件：

$image->Write('out.png'); 

不包含Alpha通道。

我一直在阅读PerlMagick的文档，但是我不能一直在寻找正确的东西。有没有办法给我的$image对象添加一个alpha通道？

我需要创建一个新的图像对象的大小的原始图像，并重新写入所有的一切？

Answer 1

alpha通道的存在是图像，需要被导通的一个属性：

$image->Set(alpha => 'On');