[Perl]Imagerで新書ジェネレータ - akihitoのログ置き場

[Perl]Imagerで新書ジェネレータ - akihitoのログ置き場

Imagerで新書ジェネレータを作ってみました。ローカルで実行するタイプです。 講談社現代新書専用です。...概要を表示 Imagerで新書ジェネレータを作ってみました。ローカルで実行するタイプです。 講談社現代新書専用です。以下ソースとテンプレート画像になります。 新書を出す前にこれでイメージをつかむと良いかもしれません。 use Imager; use utf8; my $image = Imager->new; $image->read( file => 'shinsyo_tmpl.jpg' ); my $ttfont = Imager::Font->new(file => 'HONYA-JI.ttf'); $ttfont->align(string => 'シナモンを見下す若者たち', size => 20, color => 'black', x => 10, y => 30, halign => 'start', image => $image); $ttfont->align(string =>

• Perl
• neta
• ネタ