Thread Ausgabe von PDF::Create in Variable
(7 answers)
Opened by bianca at 2009-12-26 17:10
Hi!
Benutze PDF::Create zur Erzeugung kleinerer PDF's. Der Parameter 'filename' läßt entweder einen Dateinamen oder '-' als STDOUT zu. Ich möchte gern das fertige PDF in einer Variable haben, da ich in einer sub aus einer Tabelle ein PDF machen möchte. Mein Versuch: Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 my %tabelle; print "Ergebnis:\n" . &maketab2pdf (\%tabelle) . "\n"; sub maketab2pdf { use PDF::Create; my $output = ''; close (STDOUT); open (STDOUT, '>', \$output); my $pdf = new PDF::Create ( 'filename' => '-', 'Version' => 1.2, 'Author' => 'unbekannnt', 'Title' => 'Beispiel', 'CreationDate' => [ localtime ], ); my $root = $pdf -> new_page ('MediaBox' => $pdf -> get_page_size ('A4')); #[PDF Erzeugung....gekürzt] return $output; } Ergebnis: Die sub liefert nichts zurück, keine Fehlermeldungen, keine Ausgabe in einer Datei, keine ungewollte Ausgabe auf STDOUT. Eine Gegenprüfung durch Einsetzen eines Dateinamens in 'filename' zeigt, dass alles korrekt arbeitet. Nur eben halt die Ausgabe über Variable scheint nicht zu klappen. Was mache ich falsch? Vielen Dank EDIT: Paar Tabs entfernt Last edited: 2009-12-26 17:11:53 +0100 (CET) 10 print "Hallo"
20 goto 10 |