Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/11.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Perl PDF::API2和unicode_Perl_Pdf_Unicode - Fatal编程技术网

Perl PDF::API2和unicode

Perl PDF::API2和unicode,perl,pdf,unicode,Perl,Pdf,Unicode,我试图将unicode字符串写入PDF::API2对象,但我没有工作,我将unicode字符弄乱了 our $pageWidth = 1.25*595; our $pageHeight = 1.25*842; my $titleSize = 16; my $pdf = PDF::API2->new(); $pdf->mediabox((0, 0, $pageWidth, $pageHeight)); my $font = $pdf->corefont('Times', -

我试图将unicode字符串写入PDF::API2对象,但我没有工作,我将unicode字符弄乱了

our $pageWidth = 1.25*595;
our $pageHeight = 1.25*842;

my $titleSize = 16;

my $pdf = PDF::API2->new();
$pdf->mediabox((0, 0, $pageWidth, $pageHeight));

my $font = $pdf->corefont('Times', -encode => 'utf-8');

my $page = $pdf->page();
my $text = $page->gfx();

$text->font($font, $titleSize);

my $title = '(Nėra pavadinimo šiam puslapiui)';
my $titleWidth = $text->advancewidth($title);

$text->translate(($pageWidth - $titleWidth) / 2, $pageHeight - $titleSize * 2);
$text->text($title);
my $pdfString = $pdf->stringify();
我得到了帕瓦迪尼莫�我是puslapiui。
我做错了什么

通过使用以下方法解决了这个问题

您是否指定使用utf8;在你的脚本中,你是否将其保存在UTF-8中?是的,完成了你提到的两件事。你是否检查了PDF规范,看看字符ė和š是否在核心内置字体时代可用?啊,是的,没有一种字体具有我需要注册的符号。我想我需要弄清楚你是如何使用unifont注册字体的