結局、Makefile.PL の書き換えなどはせず、GD-2.41も GD-SecurityImage-1.66 も make test で鬼のようにエラーを吐いていたが、そのまま make install した。
で、こんな↓Perl スクリプトを実行したら、一応はイメージが作られた・・・
use GD::SecurityImage;
my $image =
GD::SecurityImage->new(width => 300,
height => 40,
lines => 1,
font => "/usr/local/src/GD-2.41/t/Generic.ttf",
scramble => 2);
$image->random('hskdwyq9');
$image->create(ttf => 'default');
$image->particle;my($image_data, $mime_type, $random_number) = $image->out;
open (IMG, ">test.png");
print IMG $image_data;
close(IMG);
これで吐き出した画像が↓
うわ、きたね。
設定を変えたらきれいになるんかいな?
(ちなみに上の画像には '502425' と書かれている。一応、読めるけど・・・(^^;)
コメントする