Foro - Perl en Español

Muy buenas tardes a todos.

Estoy tratando de acceder a los valores contenidos en un hash pero no he podido extraer estos valores.

A continuación pongo el código que estoy utilizando.

# la rutina sub_consulta_db me devuelve un hash
# con los valores de la tabla que estoy consultando en la BD
my %hash = sub_consulta_db(tabla1);
my %mov = sub_consulta_db(tabla2);

# Hago la consulta a dos tablas que no están relacionadas.
# Ahora lo que ...

¡¡hola explorer!!

Disculpa; me piden desarrollar un web service pero no tengo ni la menor idea de cómo realizarlo... ¡¡¡ Abrás hecho una vez alguno... !!!

¡¡ Gracias !!

Hola a todos, por fin os encuentro...

A ver si alguien me puede echar una mano. Soy analfabeto en Perl...

Me he hecho cargo de una web escrita en Perl, de la cual quiero modificar la portada, pero cual es mi sorpresa que la parte en HTML no es exactamente HTML, etc...

El caso es que quiero incluir un slideshow en CSS para que vayan pasando de forma dinámica una serie de imágenes, y lleva ...

Hola a todos.

Tengo un problemilla al obtener el mes en la llamada al sistema "date" de esta forma.

my %meses=( ......
'noviembre' => "Noviembre",
'diciembre' => "Diciembre",
);
my $timestamp=`date "+%d de $meses{%B} del %Y"`;

No me muestra el mes en mi formato cuando hago print "$timestamp"...
Sin embargo sí que lo muestra si no hago referencia al hash...

Muchas gracias por adelantado.
Un saludo.

Hola de nuevo.

Hace poco me surgía la duda con los array y ahora con los hash.

Si quiero retornar varios hashes desde una función:
return (\%hash_1, \%hash_2, \%hash_3);

La llamada, la haré, como en el caso de los arrays, de la siguiente forma, puesto que es una referencia lo que pasa:
my ($ref_1, $ref_2, $ref_3) = miFuncion();

¿Y para usar los valores?. Esta es mi duda.

Con los arrays, por ejemplo hubiésemos hecho algo ...

Hola, soy nuevo en este foro...

Estoy tratando de hacer una función recursiva en Perl que lista el contenido de un directorio, y comprueba si cada elemento es un archivo; si lo es, lo que hace es aplicarle una expresión regular; si por el contrario es un directorio, lo que debe hacer es volverse a aplicar dentro del directorio... Gracias...

Aquí está el código

#!C:/Perl64/bin/perl.exe -w
sub buscarxtitulo($$) {
my $directorio = $_; ...

Mi consulta es: ¿cómo se les ocurriría solicitar al usuario fecha inicial y final en un script que ejecuta por línea de comandos...?

Se me ocurrió utilizar variables de día, mes y año e ir solicitándolas en distintas líneas, pero queda medio feo... y me gustaría algo que se complete en la misma línea de ser posible y evite errores como poner 31 días cuando el mes tiene 30 y esas cosillas...; esto último es ...

Hola.
Tengo una duda de cómo Perl maneja los objetos.

Tengo una clase Nodo (Nodo.pm), la cual tiene dos atributos: el nombre y una matriz nXn.

En el programa que usa la clase Nodo.pm, creo una matriz nXn llena de 0.
Creo varios objetos: objeto1, objeto2,...

Le asigno un nombre a cada objeto y le asigno la matriz, con una pequeña modificación en un campo.

Cuando imprimo cada matriz de cada objeto, resulta que todas ...

Buenas. he estado viendo el módulo HTML::LinkExtor y he visto los ejemplos que pone CPAN pero no he entendido mucho; a ver si alguien me explica un poco más sobre este módulo; ahora pongo unas cosas que me gustaría saber.

1º.- Cómo le hago para extraer todas las URL del código de fuente de una website.

2º.- Cómo le hago para extraer sólo las que tenga extensión .jpg, .gif, .png u otra extensión que se ...

Hola.

Tengo una duda/problema.

Si en una función retornas varios parámetros, tipo:
return (@var1, @var2, @var3);

Se supone que al hacer la llamada, cada variable es guardada, en orden, sobre otra variable. Me explico:
(@otraVar1, @otraVar2, @otraVar3) = &miFuncion();

Se supone que en @otraVar1, estarán los datos correspondientes a @var1, en @otraVar2 los de @var2 y así sucesivamente.

El caso es que lo estoy haciendo y en @otraVar1 obtengo los datos de @var1, @var2 y ...