ImageMagickをperlから使うモジュール使い方の例

 use Image::Magick;
 print $Image::Magick::VERSION;  #バージョンを表示して嬉しいのか?
 print "\n";
 $image = Image::Magick->new;
 $image->Read('./title.png');
 $text = "string";
 $image->Annotate(font=>'arialbd.ttf',spointsize=>10,fill=>'white',text=>$text);
 $image->Write('result.png');
{{category FreeBSD}}