Código de Perl - Obtener el número de paginas de un archivo PDF en Perl

<<>>
Imágen de perfil

Obtener el número de paginas de un archivo PDF en Perlgráfica de visualizaciones


Perl

Publicado el 02 de Enero del 2016 por xve
696 visualizaciones desde el 02 de Enero del 2016. Una media de 21 por semana
Este código muestra como obtener el número de páginas de un archivo pdf.

Requerimientos

Requiere instalar el modulo PDF desde cpan...
1
2
# cpan
cpan> install PDF

Versión 1.0

Actualizado el 03 de Enero del 2016 (Creado el 02 de Enero del 2016)gráfica de visualizaciones de la versión: Versión 1.0
697 visualizaciones desde el 02 de Enero del 2016. Una media de 21 por semana
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

Hay que pasar como parámetro el archivo pdf...
1
perl miscript.pl /path/archivo.pdf
1
2
3
4
5
6
7
8
9
#!/usr/bin/perl
 
use PDF;
my $filename = shift;
 
my $this_pdf = PDF->new;
$this_pdf = PDF->new($filename);
 
print "Tiene ", $this_pdf->Pages, " Paginas \n";



Comentarios sobre la versión: Versión 1.0 (0)


No hay comentarios
 

Comentar la versión: Versión 1.0

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios

http://lwp-l.com/s3393