Bonjour,
j'ai un souci avec le module PDF::API2 lors d'un lancement de mon script en ligne de commande :j'ai ce message :
Code : Sélectionner tout - Visualiser dans une fenêtre à part perl op.pl -modele "a.pdf" -copie "b.pdf"
Mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 The PDF file uses a cross-reference stream, which is not yet supported (see Know n Issues in the PDF::API2 documentation) at C:/Perl/site/lib/PDF/API2/Basic/PDF/ File.pm line 1136.
A savoir que sur un autre poste, cela marche.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27 #!/usr/local/bin/perl use strict; use PDF::API2; use Getopt::Long; my ($modele, $copie) = (); GetOptions ("modele=s" => \$modele, "copie=s" => \$copie ) or die("Error in command line arguments\n"); my $pdf = PDF::API2->new(); my $p_modele = PDF::API2->open($modele); my $p_copie = PDF::API2->open($copie); my $count = $p_copie->pages(); $count = $count+1; my $i; my $page = $pdf->importpage($p_modele); for($i = 1; $i < $count; $i++){ $page = $pdf->importpage($p_copie, $i); } $pdf->saveas('new.pdf');
Pourriez-vous m'aider ?
Partager