Webmonkey turi gana neblogą straipsniuką apie PDF generavimą su PHP. Tiesa, pusė to straipsnio yra apie įdiegimą (kuris pasirodo yra baisiai sudėtingas), o kita — apie jo vartojimą.
Skaitant tą straipsnį iškilo man mintis ar Perle irgi taip įmanoma padaryti. Trumpas apsilankymas pas CPAN, perl -MCPAN -e 'install PDF::Create' ir jau turiu modulį PDF generavimui Perle. Štai Perlinis kodas, sugeneruojantis PDF dokumentą (pavyzdį galit matyti čia):
#!/usr/bin/perl use strict; use PDF::Create; my $pdf = new PDF::Create('filename' => 'out.pdf', 'Version' => 1.2, 'PageMode' => 'UseOutlines', 'Author' => 'moxliukas', 'Title' => 'Testas'); my $root = $pdf->new_page('MediaBox' => [0, 0, 612, 792]); my $page = $root->new_page; my $f1 = $pdf->font('Subtype' => 'Type1', 'Encoding' => 'WinAnsiEncoding', 'BaseFont' =>'Helvetica'); $page->stringc($f1, 40, 306, 426, "Petras Kudaras"); $pdf->close;