Foro - Perl en Español

Hola a todos,

El caso es que tengo un bucle for, del que quiero salir en caso de que se dé una determinada condición.

Me gustaría saber si la instrucción last también funciona con los bucle for o si sólo lo hace con los bucles while.

¡Muchas gracias!
Felipe

Saludos a todos. Tengo un problemilla con los distintos tipos de codificación.

He hecho un programejo que se baja desde una URL con el "wget"un archivo determinado que yo renombro poniendole de extension .xml

Funciona perfectamente,el problema es que ese archivo es llamado por un swf y no lo entiende porque el xml viene codificado en código ANSI, si abro el xml y manualmente lo guardo como UNICODE funciona perfectamente pero claro no puedo automatizarlo. ...

Hola saludos amigos, necesito sabes como puedo crear un ejecutable de una aplicacion que estoy desarrollando con perl-tk, mysql y html para los reportes. gracias.....

Como les va, todavía sigo con mi problema de spam. Ahora estoy haciendo que el formulario sea enviado sólo si la respuesta es supongamos, PEDRO.
Pero no sé cómo escribir esa parte. Tengo sólo esto:
if ($FORM{'resp'}) {
$name = "$FORM{'resp'}";
$name =~ s/"//g;
$name =~ s/<//g;
$name =~ s/>//g;
$name =~ s/\&//g;
} else { &error(no_resp); }
Pero esto sólo estaría diciendo que no acepta esos caracteres pero sí acepta todas las palabras. Yo ...

¿Q tal...?

por favor necesito ayuda!!! intento crear un .cgi q pueda manipular el puerto paralelo, enviando datos al registro de datos, el receptor es un simple circuito q enciende leds, utilizando:
Device::Parallelport;
Device::ParallelPort::drv::win32;

Pero no entiendo porq no funciona, los leds no prenden, el codigo es simple:
...
use Device::ParallelPort;
use Device::ParallelPort::drv::win32;
my $port = Device::ParallelPort->new('win32');
...
$port->set_data (chr($dato));
exit(1);

No hace mucho enpeze a programar en Perl, logre hacer correr varios programitas pero ...

Nuevamente con problema de fechas.

El problema es que no me cuenta los días adecuadamente, tengo mi archivo de días de asueto que es el siguiente

*Holiday

1/1 = 1 de enero
20/1 = 20 de enero
5/2 = 5 de febrero
19/3 = 21 de marzo
2/4 = semana santa
3/4 = semana santa
4/4 = semana santa
5/4 = semana santa
6/4 = semana santa
1/5 = 1 de mayo
23/5 = virgen ...

Buenas, tenga esta línea de código en Perl.
$dia= system("date |awk '{printf $3}' ");
y no se por qué me falla.

Lo que quiero conseguir es el número de día solamente.

La idea de utilizar esto, es porque con un date normal, por ejemplo el día 7 lo toma como 07 y yo solo quiero el 7.

gracias

Buen día,

Soy Contador y aprendí un poquito de Perl gracias a un amigo. La verdad me ha ayudado bastante en mis actividades.

Tengo una duda. ¿Cómo hago un archivo en base a otros dos donde en ambos tengo como llave un consecutivo de cliente?.

La verdad nunca he realizado algo como esto. Generalmente es que manipulo un archivo de entrada y hago otro de salida. Por eso tengo muchas dudas sobre esto.

Muchas gracias ...

Buenos dias. Estoy realizando una aplicación web que trabaja con los módulos de Template Toolkit y Class::DBI y me gustaría saber cómo puedo hacer para determinar en un formulario dónde tiene que poner correo electrónico si lo que pusieron es un correo, es decir, si no se les olvido colocar el simbolo '@'. También me gustaría saber cómo hago para ver si en vez de introducir números introducieron letras, y este tipo de cosas
gracias ...

Saludos,
Soy alex y soy nuevo.

Llevo todo el día buscando y lo que parecía una tontería se ha convertido en una perdida de tiempo.

Soy nuevo en Perl, en realidad lo estoy viendo gracias a las estadísticas AwStats que están hechas en perl.

Mi problema es que estoy en un hosting, con 2 webs, y tengo que hacer un archivo Perl que ejecute otros archivos Perl, o sea que ejecute...

/home/dominio.com/www/awstats/cgi-bin/awstats.pl -config=dominio.com -update
/home/dominio.com/www/awstats/cgi-bin/awstats.pl ...