Foro - Perl en Español

Hola,

Necesito parsear un montón de PDF (que contienen sólo texto) y me gustaría que me dijerais si algún módulo es mejor o más fácil de utilizar.

Los que he mirado hasta ahora parecen estar pensados para crear, no para leer PDF.

¿¿ Me recomendáis que mire en profundidad PDF::Reuse ??

Si conocéis algún tutorial o ejemplos de uso os estaré muy agradecido.

Un saludo y gracias por vuestra ayuda ...

:wink:

¿Alguien me puede ayudar a revisar un formulario de contacto?

Formulario hecho en Flash as2 se envía por Perl con archivo .pl.
Sitio alojado en Yahoo hosting y no permite archivos .cgi.
Servidor Unix

Dicho archivo es el famoso FormMail Matt Wright.
Ya modifiqué lo que dicen las instrucciones pero no funciona. Solo dice que se envía pero no llega nada.

Se envía a un correo ...

Hola a todos, estoy realizando una tarea en la que creo que me he complicado. Mi programa debe simular al problema de los filósofos comensales. Tengo problemas en hacerlo funcionar correctamente.

Les dejo un link para descargar los ficheros. Les agradecería mucho su ayuda ayuda porque ya me perdí. Disculpen las molestias.

http://www.megaupload.com/?d=T4K26FXO

He creado cuatro ficheros. Este es el que llamé Principal.cgi
use Filosofo;
use Tenedor;
use Mesa;
use threads;
use Thread::Semaphore;
use ...

¡¡Hola a todos!!

Tengo un problema con un programa en Perl, soy nueva en esto. Estoy utilizando un código que no está hecho por mi. El problema es que donde declara las variables my(@input,$output), según entiendo, hay que definirlas y son archivos, me dice que input es un arreglo. Entonces mi pregunta es si me pueden explicar cómo debo definir el archivo para que el programa funcione.

Gracias

P.D. Solo agregué el programa principal porque ...

Hola.

¿Alguien conoce algún modulo que cifre y descifre ficheros en función de claves públicas y privadas?

Crypt::RSA hace esto mismo pero no cifra ficheros si no un string.

Un saludo,
Ricar.

Hola de nuevo a todos.

Esta vez me gustaría saber si alguien ha entrado en la aventura de leer un documento ooxml de Excel. Yo lo estoy intentando con unas librerías que encontré en un post (Archive::Zip y XML::Twig).

Leyendo por ahí encontré que si se renombra un archivo .xlsx a .zip obtienes una estructura de archivos y es por eso lo de la librería para archivos zip.

Gracias de antemano.

Agradecería muchísimo si me pudiesen ayudar en lo siguiente: Estoy trabajando con el modulo PDF::API2 y necesito insertar en el documento un código de barras. En CPAN la explicación de este tipo de inserciones es casi nula:

$bc = $pdf->xo_2of5int %opts
$bc = $pdf->xo_3of9 %opts

Suponiendo que tenga el número a convertir a código de barras y el tipo de código a utilizar, ¿cómo hago la inserción?

¡¡¡¡¡Muchas gracias!!!!! ...

Buenas tardes,

resulta que necesito realizar una conexión por SSH y he intentado hacerlo de todas las formas y no me ha funcionado. La idea es conectarme a un switch pero no he podido. Con la conexión telnet sí me ha funcionado, como lo muestro a continuación.

use Net::Telnet;
use Sys::Hostname;

system("cls");
$telnet = new Net::Telnet ( Timeout=>10, Errmode=>'die');
$telnet->open ('172.30.96.19');
$telnet->waitfor('/Username:/i');
$telnet->print('admin');
$telnet->waitfor('/password:/i');
$telnet->print('*********');
$telnet->waitfor('/\login/i');
$telnet->print('tftp 172.30.100.5 put 3comoscfg.cfg BkGY_172_30_96_19.txt');
sleep(10);
$telnet->print ('exit'); ...

Hola, tuve un problema con el ordenador y al reinstalar no me funciona la librería DBI. La he intentado reinstalar varias veces pero no hay manera, siempre me acaba saliendo el mismo error. Espero que podáis ayudarme.

Simplemente con el código use DBI; ya salta el siguiente error:
DBI object version 1.609 does not match $DBI::VERSION 1.611 at D:/xampp/xampp/perl/lib/DynaLoader.pm
line 223.
BEGIN failed--compilation aborted at D:/xampp/xampp/perl/lib/DBI.pm line 265.
Compilation failed in require at D:\Users\All Users\Documents\scripts_perl\prueba.pl ...

Hola. Necesito hacer un ping a un host, pero debo verificar que el host sea válido... Este es el código que tengo y no puedo encontrar el error gracias...

sub monitor{
my $host = $_;
my $count = $_;
my $dirTxt = $_;
my $ping;
my $fecha;
my $verFqn = Net::DNS::Resolver->new;
print "<br>aqui estoy</br>\n";
if ($verFqn->query($host)){

$ping = qx(/sbin/ping -c$count $host);
$fecha = qx(date +_%Y-%m-%d_%H:%M.txt);

open(texto, ">$dirTxt/$host$fecha");
print texto $ping;
close(texto);

print "existe el host"; ...