Name Tag Generator Part 6

nametag6.pl

# Create our shadow image
my $shadow = Image::Magick->new;
$shadow->Set( size => '503x339' );
$shadow->ReadImage( 'canvas:black' );
$shadow->Annotate(
	font      => $font,
	pointsize => $size,
	fill      => 'white',
	text      => $name,
	x         => $x + $offsetx,
	y         => $y + $offsety,
	antialias => true,
);
$shadow->Blur(
	radius => $radius,
	sigma  => $sigma,
);