Foro - Perl en Español

Hola a todos.

Tengo una aplicación con cerca de 200 reportes, que son consultas a una base de datos MySQL, algunas muy simples y otras muy complicadas.

Me encontré por allí en CPAN que con algunos módulos se puede convertir a Excel la salida de dichas consultas, pero se me hace muy complicado duplicar todas esas consultas para exportarlas a Excel, según yo entendí.

¿No hay una forma en la que, una vez generado el ...

Si sois usuarios de Google (de cualquiera de sus servicios), podéis entrar en Google App Engine, en la sección de incidencias, y votar para que Google dé soporte a Perl.

Sólo tenéis que pulsar en la estrella que aparece a la izquierda, en la incidencia número 34.

¡Gracias!

Hola a todos,

estoy haciendo un programa que busca abreviaturas en un texto basandose en un hash donde se guardan las abreviaturas como clave y su significado como contenido.
Entonces, cuando se encuentra una abreviatura en el texto, etiqueta la abreviatura y a continuación pone su significado. Si en el texto original encontramos:

AAD

el programa sustituye el anterior fregmento por:

<ABREVIATURA><ABR>AAD</ABR><SIGNIF>Arco aórtico derecho.</SIGNIF></ABREVIATURA>

.

El caso es que en uno de los informes, el programa ...

No tengo ni idea de cómo dividir el ifconfig para que me dé cada bloque de información (eth0, eth1, lo, bond0...) y luego dividir esos bloques para conseguir toda la información como toca y organizada.

¡Ayudadme, por favor!

Buenas noches. Creo que ya se me hizo costumbre preguntar, pero ahí voy. Mire, tengo la siguiente cadena: "<dia>15 hoy</dia> bla bla bla fe4<etc> <mes>enero 1</mes>sssas".

Quiero sacar el valor que está entre <dia>y</dia> y el valor que está entre <mes>y</mes>.

Yo he programado esto en PHP con la función explode() pero en el Perl no veo una función que me haga esto. He estado investigando y vi una: la función split...

Escribí esta parte... ...

Hola, tengo una duda: estoy usando el módulo Mysql de perl
#!/usr/bin/perl -w
use CGI ':standard';
use CGI::Carp qw(fatalsToBrowser);
use Mysql;

la sintaxis de la conexión que uso es
$db = Mysql->connect($host, $db, $userid, $passwd);
me conecta todo normal y me ejecuta las consultas que le pido todo bien...
Pero quisiera saber cómo cerrar la conexión Mysql. Por ejemplo, para el módulo DBI es
# disconnect from database
$sth->finish();
$db->disconnect;

Hola a todos, soy nuevo en este foro; recién me estoy iniciando en el mundo del Perl y tengo una duda; ¡alguien que me ayude! :)

Buscando en Internet encontré este código para tratar un GET desde URL.
#!/usr/bin/perl -w
print "Content-type: text/html\n\n";
my(%Variables); #Iniciamos el hash
#Leemos el query enviado
my $buffer = $ENV{'QUERY_STRING'};
#Dividimos cada variable
my @pairs = split(/&/, $buffer);
foreach my $pair (@pairs) ...

Hola a todos.
Les cuento que he estado trabajando en un agente SNMP en Perl que, básicamente, recibe información de ciertos módulos (en un formato propio) y mediante una sesión SNMP creada usando el módulo SNMP envía traps (con la función trap()) a un master.

Lo anterior ya está hecho y funciona bien, pero ahora debo agregar una nueva funcionalidad. La idea que es que este mismo agente SNMP levante en otro puerto un server ...

¡Hola!

En un script Perl quiero hacer un:
my $scp_resultado = `scp -r /tmp/$file sybase\@dc-db2-db:/tmp/$file <<END1
END1`;
El problema es que el comando me pide password. ¿Cómo puedo hacer una llamada para copiar dos ficheros entre dos servidores y pasar el password como parámetro?

¡Gracias por adelantado!

Consulta.

¿Alguien usa o sabe dónde puedo conseguir un módulo y script el cual sirva para parsear el log del postfix? Porque me gustaría ver la posibilidad de sacar la cantidad de mails que envían todas las cuentas de correo de mi server en el periodo de una hora.

Saludos.