Marquage de fichier PDF, soucis avec certains fichiers

**Arioch** · 01/06/2015, 12h27

Bonjour,

ça fait une éternité que je n'étais plus passé ici mais je reprend du service en Perl depuis peu

Pour des besoins d'ordre professionnel, je dois marquer à la volée des fichiers PDF.

Pour ce faire, j'utilise la lib PDF::API2 mais pour certains PDF, la tentative de marquage échoue et j'ai ceci comme message d'erreur :

erreur sur TOTO.PDF : The PDF file uses a cross-reference stream, which is not yet supported (see Known Issues in the PDF::API2 documentation) at C:/Perl/site/lib/PDF/API2/Basic/PDF/File.pm line 1048.

Et effectivement, en installant cette lib, j'avais bien vu qu'elle ne gérait pas les flux de références croisées (kézako ?).

Je tourne sous Perl 5.16 et dans PPM, je n'ai pas vu d'autres libs aptes à me marquer les PDF récalcitrants.

Je pensais ruser en convertissant mes PDF rebelles

en postscript, puis rebasculer du postscript vers du PDF mais j'ai la désagréable impression de devoir développer un missile thermo nucléaire pour éradiquer un moustique mort

Auriez-vous une piste à me proposer ?

Au boulot, on me demande un taux de réussite supérieur à 80 %. J'arrive péniblement à 58 % sur les centaines de fichiers PDF représentatifs de ce que mon programme devra marquer par la suite.

Coucou à Djibril et Jedai s'ils sont toujours dans les parages !

**djibril** · 01/06/2015, 13h27

Salut Arioch,

Installe ImageMagick peut-être. Tu pourras en ligne de commande convertir tes PDF en postscript.
Sinon, tu as l'application gratuite pdfsam-starter qui te permet de manipuler facilement des PDF.

**Arioch** · 01/06/2015, 13h53

Merci pour tes propositions Djibril mais elles vont m'amener dans une impasse.

Mon script devra à terme être déployé sur notre réseau interne afin d'être accessible à plusieurs personnes qui ont Perl installé sur leur disque dur.

Je vais me débrouiller pour déposer les fichiers nécessaires de PDF::API2 avec le script mais ne peux me permettre de demander à notre département informatique de déployer un quelconque logiciel sur leurs postes.

**djibril** · 01/06/2015, 14h59

ah ok.
Sinon, tu entends quoi par marquage ?

**Arioch** · 01/06/2015, 15h19

C'est juste un texte personnalisé que je dois placer en haut à gauche de chaque page de mes PDF.

J'ai bien une autre astuce mais elle ne me plait guère...

Comme j'utilise la fonction eval() au moment où je tente de marquer mes fichiers, il m'est très facile de lancer un convertisseur PDF en PostScript si jamais le marquage a échoué.

J'ai remarqué que le distiller Acrobat d'Adobe, quand configuré pour refaire un PDF au standard 1.5 de la lib PDF, me concocte un fichier PDF qui se marque presque à chaque fois.

Donc, en générant à la volée des fichiers PostScript, dès qu'il y a un soucis, ça me permet ensuite de gérer les fichiers problématiques via le distiller.

Mais bon, sur 431 PDF testés en un lot, 249 ne se marquent pas...

**djibril** · 01/06/2015, 15h35

Hum, ça fait des lustres que je n'ai pas manipulé des PDF en perl.

Avec PDF::API2

This module does not work with perl's -l command-line switch.

PDFs using cross-reference streams instead of cross-reference tables are not yet supported. Cross-reference streams were added as an option in version 1.5 of the PDF spec, but were only used infrequently until Adobe Acrobat 9 started using them by default. A patch would be welcome -- see the PDF 1.7 specification, sections 7.5.4 and 7.5.8 for implementation details.

CAM::PDF et PDF::Reuse

Je ne les ai jamais jamais utilisé, à voir aussi.

**Arioch** · 01/06/2015, 15h37

Je vais zieuter de plus près ces deux modules, merci m'sieur Djibril !

**Arioch** · 04/06/2015, 11h53

Je viens donner quelques nouvelles.

C'est pas concluant et j'abandonne le développement du coup.

Le module PDF::API2 ne sait pas gérer les PDF ayant des "cross-references tables" ou autrement formulé, des tags internes/externes (signets dans le corps du texte grosso modo).

Les autres modules Perl font plein de choses avec un fichier PDF, mais pas le marquage. Ou alors c'est pas documenté sur le CPAN pour ces modules.

Je n'ai pas trouvé d'utilitaire suffisamment sympa pour accepter d'être piloté depuis un programme Perl.

Bref, je sèche.

-------------------------------------

Pour la petite histoire, actuellement il y a un programme Perl qui tourne et fonctionne très bien. Il utilise une très vieille version de PDFlib et tourne sur une bécane isolée sous Windows 2000, laquelle bécane va bientôt être remisée au placard pour cause d'obsolescence.

Ici, il fallait faire d'une pierre deux coups : rendre accessible sur réseau le programme pour tout un chacun.

Bien évidemment, le premier réflexe que j'ai eu, ce fut de récupérer le module PDFlib.pm et la p'tite dll Windows obligatoire pour la tester sur mon Perl sous Windows 7. Module et dll non compatibles sur ce système.

Et PDFlib, autrefois sous licence GPL (sauf gourrance), est devenu payant et nécessite l'installation d'un serveur. Comme on ne m'autorisera ni l'un ni l'autre, comme ça c'est réglé.

Désolé si je ne passe pas ce topic en RÉSOLU hein, parce que ce n'est pas le cas en fait