Hi!
open(PDF, $datei) or die "Kann $datei nicht oeffnen: $!";
binmode(PDF); binmode(STDOUT); # fuer den Fall, dass das mal auf Windows oder
# einem aehnlich alterteumlichen System laeuft ;-)
print while (<PDF>); # ;-)
So long