I have suffered the issue for adding Chinese font to my PDF document, i tried with the tutorial of the model, and it worked perfectly. But we need to put the add_font method after add_page(), otherwise the error will be same as we mentioned in this thread.
Here is my code.
use PDF::API2::Simple;
use Encode;
use Gaia::Common::Utils;
my $pdf = PDF::API2::Simple->new(
file => 'root/tmp/foo.pdf',
width => 595,
height => 842
);
my $font = $pdf->pdf->ttfont('root/statics/font/stsong.ttf');
$pdf->add_page();
$pdf->add_font('', $font, '12' ); # note this line need to be after ab
+ove line.
$str = "欢迎进入Perl的世界 H
+ello World";
$str = decode("utf-8", $str);
#$str = encode("utf-8", $str);
# Count
$pdf->text(
$str,
x => 100,
y => 700,
font_size => 12,
);
$pdf->save();
|