電線の画像

Pointgets.net

写真やサンプルプログラムなど、日々の気になった出来事をメモしてる個人的なブログです。

PDFファイルの文字列を改行してPDF::API2で生成

PerlモジュールのPDF::API2を使用して、PDFファイルのテキストを改行して出力しました。

#!/opt/local/bin/perl
 
use strict;
use warnings;
use PDF::API2;
 
my $pdf = PDF::API2 -> new();
my $page = $pdf -> page();
$page -> mediabox("A4");
my $font = $pdf -> cjkfont("KozMin",-encode => "utf-8");
my $text = $page -> text();
$text -> translate(250,585);
$text -> font($font,100);
$text -> text("は");
$text -> cr(-100);
$text -> text("に");
$text -> cr(-100);
$text -> text("ほ");
$text -> cr(-100);
$text -> text("へ");
$text -> cr(-100);
$text -> text("と");
 
print "Content-type: application/pdf; charset=utf-8\n\n";
binmode(STDOUT);
print $pdf -> stringify();
 
exit;

サンプルコードです。

出力結果です。

スポンサードリンク
スポンサードリンク