Foro - Perl en Español

Hola,

¿Hay algún tutorial o ejemplos donde explique CGI y Template Toolkit?

Quiero realizar un CGI con templates para usar formularios.
Si, por ejemplo, introduzco un nombre, poder hacer en el cgi acciones con el mismo en una base de datos. Para recuperar los datos, utilizaré param() pero ¿cómo hago la conexión del CGI con el HTML?

¡Hola!

Me acabo de enterar de Perl y me gustaría mucho aprenderlo. Mi objetivo es ser capaz de automatizar procesos de mi computador (Windows 7, no Linux), sin necesidad de aprender temas para administradores de redes...

He bajado hartos libros gratis de perl.org, pero ninguno parece estar actualizado para alguien de nivel principiante (en mi caso nivel 0).

¿Cómo recomiendan aprender Perl? Ya logré instalar la versión 5.12.2 de Strawberry Perl.

Muchas gracias, ¡esta página ...

Hola perleros.
Tengo un problema de optimización con un pequeño script. Lo que tengo que hacer es: teniendo dos archivos, comprobar que la primera parte (hasta el primer espacio) de cada línea de uno de los archivos se encuentre en el otro archivo, y de no ser así, pegar toda esa línea en un nuevo archivo resultado.

Mi script es el siguiente;

#!/usr/bin/perl

use strict;

use warnings;

open (FILE ,"archivo1");
open (FILE2 ,"archivo2");

my ...

Hola,

Estoy intentando ejecutar un script y al ejecutarlo obtengo el siguiente error

ld.so.1: perl: fatal: relocation error: file /opt/interfaces/colectoras/lib/auto/infovista/infovista.so: symbol Perl_Gthr_key_ptr: referenced symbol not found

¿Cómo podría solucionarlo?

Saludos y gracias.

Estimados:

Tengo una función PHP que hace una llamada a system(perl programa.pl); El programa.pl lee desde un documento n* cantidad de palabras y analiza cada una de ellas.

El problema es que, cuando son unas 700 palabras, el programa nunca termina, pero al hacer print(), para ver cuál de las palabras está analizando no lo muestra en el html, solo cuando se termina la ejecución del script. Además, tengo un script cgi, que sucede lo ...

Hola a todos,

Soy nuevo por aquí. No tengo ni idea de Perl más allá de lo que es ejecutar scripts / herramientas programadas en Perl. Tampoco suelo tener mayor problema con scripts multiplataforma que se suponen deben funcionar tanto en UNIX/Linux como en Windows. Sin embargo, tengo un script que sí me está dando quebraderos de cabeza solo en Windows.

El error que devuelve es:
Reading rules...
Couldn't read . - Permission denied
at ...

Hola, necesitamos ayuda para descargar una hash. Tenemos unas mil keys, cada una con varios values cargadas en un hash, pero no sabemos cómo descargar los values, ya que nos pinta únicamente los values de la última key para todas las keys.

Este es el código que estamos utilizando:
foreach my $key1(keys %$estructura)
{
foreach $value (values %$estructura)
{
@value=@$value;
}
print "$key-> @value";

¡¡¡Gracias!!! :P

Por qué no me imprime lo mismo que en el navegador, esta URL, por ejemplo:

http://www.google.com/#q=hola&hl=es&prmd=ivnsu&ei=-GmPTfjVBceTtwemjsnKDQ&start=90&sa=N&fp=1&cad=b

use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
my $query=$ARGV;
my $resp = $ua->get($query);
my $content = $resp->content;
$save = $ARGV;
#print "\n$content\n";
system('if not exist html (mkdir html)');
open (ESCRIBIR,">html/$save.html");
print ESCRIBIR $content;
close (ESCRIBIR);
print "Guardado en html/$save.html";

¿Cómo consigo eso?

Hola a todos.

Quisiera delimitar el tiempo de consulta a una página web. Ejemplo:

Un request; si la página no responde en 5 segundos, exit, para que no se quede congelado ahí.

Saludos.

No puedo remplazar estos caracteres: \ y ^.

$_ = "cadena que contiende \ y esto ^";

reemplazando con s///g no me funciona. Lo intenté con s///g, y nada.

Valores decimales de los caracteres, en iso-8859-1:
92 = \
94 = ^

$char=chr(92);
$content =~ s///g;
$char=chr(94);
$content =~ s///g;

Saludos