meta informationen aus pdf dateien auslesen

[Siechfred]

Hell-O!

Hab mir das mal angeschaut, ist leider nicht sehr gut dokumentiert. Ich versuche mich noch daran den Autor oder den Titel auszulesen.

So geht's:

use strict;  
use warnings;  
use PDF;  
  
print "Content-type: Text/html; charset=utf-8\n\n";  
my $pdf = PDF->new;  
$pdf->TargetFile('pfad/zu/datei.pdf');  
$pdf->LoadPageInfo;  
print 'Version: ', $pdf->Version, '<br>';  
print 'Autor: ', $pdf->GetInfo('Author'), '<br>';  
print 'Titel: ', $pdf->GetInfo('Title');

Vorteil des Moduls ist, dass es ohne PDF-Bibliotheken auskommt, der Nachteil ist, dass die aktuellste Version 1.11 aus dem Jahr 2000 stammt, also bei neueren PDF-Dateien ungewöhnliche Ergebnisse liefern kann (so stehen bei meinen Tests vor Titel und Autor ziemlich seltsame Zeichen).

Siechfred