CPANモジュールImagerで、新聞社とかがやってるようなコピーライトのロゴを写真に入れられる。

この辺を参考に

・use Imager; – 今日のCPANモジュール[まぐまぐ！]

・Elementary, … それ、Imager で

・Webから画像をとってきてリサイズする処理のベンチマーク (Yusukebe::Tech)

こんな感じで右上に入って、result.jpgとして出来た。

use Imager result

■Imagerインストール

coLinux版のDebian 4.0 etchの場合。まずaptで画像処理関係を入れておく

# apt-get install libjpeg-dev libtiff-dev libpng-dev giflib-dev libttf-dev libfreetype6-dev

んでcpan shellで

install Imager

■画像を準備してプログラミング

まずshibuya.jpgが元になる。その右上にlogo.pngを貼りたい。透過PNGで透明度を適当にして入れてみた。

結果はresult.jpgとして出力する。



　

usestrict;

usewarnings;

useImager;

my$img=Imager->new;

$img->read(file=>’shibuya.jpg’)

ordie$img->errstr;

#ロゴ貼り付け

$img->rubthrough(

src=>do{

my$tmp=Imager->new;

$tmp->read(file=>’logo.png’)ordie$tmp->errstr;

$tmp;#srcへロゴ画像のImagerオブジェクトを渡す

},

tx=>$img->getwidth-130,#右上

ty=>5,

);

#Jpeg、画質95%で保存

$img->write(file=>’result.jpg’,jpegquality=>95)

ordie$img->errstr;

use Imager; – 今日のCPANモジュール[まぐまぐ！]がもっともっと詳しい。