Foro - Perl en Español

[rookie]

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.

[creating021]

Creo que esto te servirá

http://search.cpan.org/~areibens/PDF-AP ... DF/API2.pm

Saludos

[rookie]

Gracias por el truco.

Checaré el contenido, haré algunas pruebas y ya les contaré cómo me fue.

¡¡Gracias y hasta luego!!

[explorer]

Aquí (CPAN) me salen 284 módulos...

Quizás uno de los más sencillos sea PDF::Report. Aquí hay unos ejemplos. Y aquí otro en directo:

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using perl Syntax Highlighting

1. use PDF::Report;
2.  
3. my $pdf = new PDF::Report(
4.     PageSize        => 'A4',
5.     PageOrientation => 'Portrait'
6. );
7.  
8. $pdf->newpage(1);
9. $pdf->setFont('Helvetica-bold');
10. $pdf->setSize(16);
11. my ( $width, $height ) = $pdf->getPageDimensions();
12.  
13. $pdf->centerString( 0, $width, $height - 40, "Párrafo" );
14.  
15. $pdf->setFont('Helvetica');
16. $pdf->setSize(10);
17.  
18. my $text1 = "texto de prueba";
19. my $text2 = "Segundo texto de prueba";
20. my $text3 = "Tercer texto de prueba";
21.  
22. $pdf->addParagraph( $text1, 30, $height - 70,  $width - 60, 30, 25, 10 );
23. $pdf->addParagraph( $text2, 30, $height - 100, $width - 60, 20, 25, 10 );
24. $pdf->addParagraph( $text3, 30, $height - 120, $width - 60, 20, 25, 10 );
25.  
26. open( PDF, "> ejemplo.pdf" ) or die "ERROR: No puedo escribir en ejemplo.pdf: $!\n";
27. print PDF $pdf->Finish();
28. close(PDF);
29.  
30. exit;

Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4