Select Code to Download

        my $text_overlay = Image::Magick->new();
        $text_overlay->Set(size=>'400x140');
...
                        'fill'       => 'black',
                        'antialias'  => 'true',
            );

    my $imageTool=Image::Magick->new(magick=>'JPEG');
    my $image=$imageTool->read($image_filename);
...
        '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 1
+5% overlay_test.jpg