my $text_overlay = Image::Magick->new();
$text_overlay->Set(size=>'400x140');
$text_overlay->ReadImage('xc:white');
$text_overlay->Set(alpha=>'Activate');
$text_overlay->Transparent(color=>'white');
my $err=$text_overlay->Annotate(text=>"OverlayText",
'pointsize' =>14,
'font' => 'AvantGarde-DemiOblique',
'geometry' => "+20+20",
'fill' => 'black',
'antialias' => 'true',
);
####
my $imageTool=Image::Magick->new(magick=>'JPEG');
my $image=$imageTool->read($image_filename);
my $err=$imageTool->Composite(
'image' => $text_overlay,
'opacity' => '15%',
'compose' => 'Atop',
'rotate' => 5,
'tile' => 'true',
);
####
$ convert -size 400x140 -font "AvantGarde-DemiOblique" -pointsize 14 -fill black -antialias -alpha set -transparent white -annotate +20+20 "OverlayText" xc:white white_text.png
$ composite white_text.png 48572-1.jpg -tile -compose Atop -dissolve 15% overlay_test.jpg