A3サイズのPDFファイルをPerlモジュールのPDF::API2で生成
PerlモジュールのPDF::API2を使用して、A3サイズのPDFファイルを出力しました。)
#!/opt/local/bin/perl
use strict;
use warnings;
use PDF::API2;
my $pdf = PDF::API2->new();
my $page = $pdf->page();
$page->mediabox("A3");
my $font = $pdf->cjkfont("KozMin", -encode => "utf-8");
my $text = $page->text();
$text->font($font, 16);
$text->fillcolor("#FF0000");
$text->translate(10, 380);
$text->text("A3");
$text->cr("-24");
$text->text("297mm x 420mm");
print "Content-type: application/pdf; charset=utf-8\n\n";
print $pdf->stringify();
exit;
サンプルコードと出力結果です。A3サイズのPDFファイルを出力しました。cjkfont
でフォントを小塚明朝、font
でフォントのピクセルサイズ、fillcolor
でフォントの色、translate
で描画を開始する左下からの座標、text
で描画する文字列、cr
で改行をフォントサイズの1.5倍に設定しています。