- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #3914 [639]
От : Artem Chuprina 2:5020/400 23 июня 04, 22:34
Кому : Melekhov Alexandre A. 24 июня 04, 21:05
Тема : Re: PDF::Create
-------------------------------------------------------------------------------
From: Artem Chuprina
Melekhov Alexandre A. -> Melekhov Alexandre A. @ Wed, 23 Jun 2004 10:25:15
+0000 (UTC):
>> Доброго времени суток!
>>
>> Кто-нибудь из присутствующих здесь учил русскому языку сабж?
MAA> И вот что интересно:
MAA> #!/usr/bin/perl -w
MAA> use strict;
MAA> use PDF::Create;
MAA> use Convert::Cyrillic;
MAA> my $pdf = new PDF::Create('filename' => 'proba.pdf',
MAA> 'Version' => 1.2,
MAA> 'PageMode' => 'UseOutlines',
MAA> 'Author' => 'S.N.',
MAA> 'Title' => 'Proba',
MAA> );
MAA> my $root = $pdf->new_page('MediaBox' => [ 0, 0, 612, 792 ]);
MAA> my $page = $root->new_page;
MAA> my $f1 = $pdf->font('Subtype' => 'Type1',
MAA> 'Encoding' => 'WinAnsiEncoding',
MAA> 'BaseFont' => 'Courier');
MAA> my $Src = 'koi8';
MAA> my $Dst = 'win';
MAA> my $SrcBuf = 'таки шолом, товарищи бояре';
MAA> my $DstBuf = Convert::Cyrillic::cstocs ($Src, $Dst, $SrcBuf);
MAA> $page->stringc($f1, 20, 300, 300, $DstBuf);
MAA> $pdf->close;
MAA> proba.pdf генерится и в нем vi-ем можно прочитать то, во что
MAA> конвертится $Src, т.е. в pdf'ке есть строка из русских букв, в
MAA> данном случае в 1251 и она корректно перекодируется iconv'м. Hо,
MAA> черт возьми, при просмотре _любым_ pdf-ридером, русский есть, и не
MAA> перекодированный koi8->win, как бывает при просмотре некорректно
MAA> написанных страниц. Смотреть пробовал из-под виндов (разных) и
MAA> разными читалками (акробатом, xpdf, gv) - нифига.
MAA> Остатки мозгов уже закипают... Может зря я не хочу ставить *ttf? :)
Hасчет нежелания ставить ttf не знаю, а вот что в _настоящем_ Corier нет
глифов русских букв как класса - это факт. Если у тебя русские буквы им
вообще видны, то он у тебя явно подмененный, и уж по какой кодировке там
раскиданы русские глифы - тебе лучше знать. Если от kapella, то там по
koi8-r, т.е. у тебя они "не перекодированные" не в ту сторону.
--
Artem Chuprina
RFC2822: , FIDO: 2:5020/122.256, ICQ: 13038757
--- ifmail v.2.15dev5.3
* Origin: Leninsky 45 home network (2:5020/400)