Foro - Perl en Español

Buenas,

Estoy programando un script que se ejecutará en sistemas operativos variados (diferentes sabores de Linux, *BSD, etc...) recién instalados, es decir, tendrán una instalación mínima de Perl.

Este script, entre otras cosas, se conectará a un servidor web vía HTTP para descargar un simple fichero de texto, utilizando autentificación básica (par usuario/contraseña).

Por ahora estoy utilizando el módulo LWP y funciona perfectamente, pero quisiera prescindir de él, ya que en los recién instalados servidores ...

Necesito controlar que una entrada SÓLO contenga los valores 'A', 'T', 'C' o 'G'.

Yo había pensado algo así:

if ($tupla =~ /+/)

pero sólo me "funciona" si sólo contienen letras que no sean 'a', 't', 'c', 'g'. Por ejemplo:

si entro 3 --> error (OK)
si entro AT --> bien (OK)
si entro bx --> error(OK)
si entro abx --> bien (¡¡¡MAAAL!!!)

No sé cómo definir que no hayan "cosas" intercaladas :S

Hola, tengo una duda, cuando una función se ejecuta devuelve verdadero, pero ¿qué devolvería este código?
if ($edad=0) {
print “ Verdadero o falso”;
}
¿y qué es lo que haría?

Me permito crear este tema ya que encuentro muy poco material en español y me parece algo MUY MUY potente para desarrollar en Perl. Aun que en ingles tampoco hay demaciado (la mayor parte de veces no esta 100% explicado).

Me gustaria empezar por lo basico como hacer una relacion cliente servidor (el cliente en POE y el servidor cualquier cosa... -irc,ftp,telnet-)

De momento lo que que conseguido es conectarme con un servior y recibir ...

Hola.

No encuentro, deben ser la torrijas :D , la forma de leer un fichero y separar por posición los campos de cada registro.

Ejemplo de registro:
1234567890nombre apellidos dirección

Quiero obtener:
CAMPO1 : Los primeros 10 caracteres
CAMPO2 : De la posición 11 a la 24
CAMPO3 : De la posición 25 a la 42
CAMPO4 : De la posición 43 a la 60

Un ...

Hola a todos, mi duda es la siguiente.

¿Para que se utiliza esto '<<'?

He intentado averiguarlo con este pequeño código pero no me sale nada.
$mensaje = <<SALUDO;
hola,
adios,
SALUDO
Lo he escrito de diferentes formas, pero nada.

Buenos días.

Necesito saber cómo puedo recorrer todos los ficheros de un directorio que tengo en el disco duro. Lo he probado con un módulo, pero no me funcionaba...

Muchas gracias!


PS. Uriel, ¡felicidades por ser padre!

Salu2

Que tal gente,

Bueno había pasado ya tiempo en el que no había podido dedicar un rato agusto a desarrollar algún otro módulo para Perl como hobby, ahora le tocó al turno a Net::RMI, un módulo cuyo propósito principal es proveer una interfaz para llamadas de procedimientos remotos ( RPC ) muy sencilla, amigable al desarrollador y orientada a objetos, muy similar a como lo hace Java con RMI.
La idea es poder tener objetos ...

saludos.

Tengo un script en perl y gtk2 y necesito reproducir un video o audio en un determinado evento. alguien podria orientarme acerca de como podría reproducir un video o reproducir audio en una *ventana*? (sin salir de ella)... ¿qué widget se usa?...

Hola Buenos dias :(

Estoy Creando una funcion la cual me debe guarda en la carpeta /tmp la session del usuario con la que estoy ingresando.
este es el codigo va en el .pm

if ($clave eq "$clave1"){
$expire='+1M';
$session = new CGI::Session(undef, $self, {Directory=>'/tmp'});
$session-> param ("dusuario",$usuario1);
$session-> param ("dclave",$clave1);
$cookie = $query->cookie(CGISESSID=>$session->id);
$self->header_props(-cookie=>);
}
los errores que da es que no me esta creando ...