[magick-users] perlmagick: making parts transparent using a mask

[David N. Lombard]

Anthony Thyssen wrote:

> 
> $earth->Write('show:');
> $earth->Write('earth.png');

Hmmm, I got this odd error (IM 6.3.2):

	display: unrecognized option `-window_group'

I can't find any documentation on 'show:', but I guess this causes the 
direct display of the image.  In that event, this replacement for the 
above two lines does works for me:

	$earth->Display();

BTW, the Linux version that works for me is:

	#!/usr/bin/perl
	#
	# Command Line equivalence
	#   convert aardebolletje3.png aardebolletje-mask.png \
	#           +matte -compose CopyOpacity -composite \
	#           -write show:  earth.png
	#
	use strict;
	use Image::Magick;

	my $earth=Image::Magick->new();
	$earth->Read("aardebolletje3.png");

	my $mask=Image::Magick->new();
	$mask->Read("aardebolletje-mask.png");

	$mask->Set(alpha=>"Off");

	$earth->Composite(
	        image => $mask,
	        compose => 'CopyOpacity',
	        );

	# Remove Write('show:') due to following error (IM 6.3.2):
	#   display: unrecognized option `-window_group'.
	#$earth->Write('show:');
	$earth->Write('earth.png');

-- 
dnl