Foro - Perl en Español

por **rookie** » 2006-03-01 18:52 @828

Saludos.

He investigado en Internet acerca de cómo generar reportes en archivos con formato PDF con un programa de Perl, como por ejemplo, realizar una consulta a una base de datos y guardar la salida de la consulta en un archivo PDF, todo desde Perl.

No he encontrado mucho, pero ojalá alguien de ustedes me alumbre el camino, solo necesito saber si se puede hacer. Y donde puedo encontrar información al respecto.

Saludos y gracias por su ayuda.

use PDF::Report;
 
my $pdf = new PDF::Report(
    PageSize        => 'A4',
    PageOrientation => 'Portrait'
);
 
$pdf->newpage(1);
$pdf->setFont('Helvetica-bold');
$pdf->setSize(16);
my ( $width, $height ) = $pdf->getPageDimensions();
 
$pdf->centerString( 0, $width, $height - 40, "Párrafo" );
 
$pdf->setFont('Helvetica');
$pdf->setSize(10);
 
my $text1 = "texto de prueba";
my $text2 = "Segundo texto de prueba";
my $text3 = "Tercer texto de prueba";
 
$pdf->addParagraph( $text1, 30, $height - 70,  $width - 60, 30, 25, 10 );
$pdf->addParagraph( $text2, 30, $height - 100, $width - 60, 20, 25, 10 );
$pdf->addParagraph( $text3, 30, $height - 120, $width - 60, 20, 25, 10 );
 
open( PDF, "> ejemplo.pdf" ) or die "ERROR: No puedo escribir en ejemplo.pdf: $!\n";
print PDF $pdf->Finish();
close(PDF);
 
exit;
Coloreado en 0.007 segundos,  usando GeSHi 1.0.8.4

Foro - Perl en Español

Cómo generar archivos PDF con Perl

Cómo generar archivos PDF con Perl

Publicidad

Re: Cómo generar archivos PDF con Perl

¿Quién está conectado?