Foro - Perl en Español

Cuando ejecuto esto:

(open (FICHEROCFG, "<$fichero_cfg") or die "No se puede abrir el fichero de configuracion de transacciones $fichero_cfg!!\n";
while ($linea=<FICHEROCFG>) {
($var1,$var2,$var3,$var4) = split (",", $linea);
$indice = $#{$db{$var1}} + 1;
$db{$var1}{'counter'} = '';
$db{$var1}{'Entidad'} = $var2;
$db{$var1}{'Agrupacion'} = $var3;
$db{$var1}{'Transaccion'} = $var4;
}
while (($data_contador, $data_cod_entidad, $data_cod_agr, $data_cod_operacion) = $sth1_do->fetchrow_array) {
foreach $cn_nombre (keys (%db)) {
foreach $cn_indice (0..$#{ $db{$cn_nombre}} ) {
if ($db{$cn_nombre}{'Entidad'} == $data_cod_entidad and $db{$cn_nombre}{'Agrupacion'} == $data_cod_agr) {
$db{$cn_nombre}{'contador'} = ...

Hola,
Necesito hacer un script en Perl que sirva para descargar imágenes de un sitio web, indicándole como input un archivo txt que contiene en cada línea una URL directamente a la imagen.

Ejemplo del txt:

Code: Seleccionar todo

http://www.lalalala.com/caratula02.jpg
http://www.lalalala.com.ar/caratula02.jpg
http://www.lalalala.com.ar/caratula02.jpg
http://www.lalalala.com/caratula01.jpg

http://www.lalalala.com.ar/caratula02.jpg
http://www.lalalala.com.ar/caratula02.jpg
http://www.lalalala.com/caratula02.jpg
http://www.lalalala.com.ar/caratula02.jpg
http://www.lalalala.com.ar/caratula02.jpg

Cada x cantidad de renglones hay una línea vacía. ¿Hay forma de que tome esta línea vacía, y genere una carpeta distinta para cada juego de imágenes? (cada juego de ...

¡Hola a todos!

Agradezco enormemente a los que podáis sugerirme algo en relación a lo siguiente:

A partir de una serie de ficheros CSV (texto con columnas separadas por coma), necesito extraer información de operaciones bursátiles diarias y calcular una serie de estadísticas, para posteriormente presentarlas de una forma más elegante y, si es posible, con gráficas incluidas.

Necesito realizar sumas de varias filas de una misma columna, medias, búsqueda de valores máximos y mínimos, ...

Hola de nuevo, visto lo bien que me ha ido en este foro, no he dudado en recurrir a él tras buscar y no encontrar solución a mi duda.

La pregunta creo que queda clara en el asunto: necesito ejecutar procesos Perl como lo hago con el shell "ksh", es decir con el parámetro -x. Con él puedo ver la ejecución del código línea a línea, pudiendo trazar valores de variables y resultado de ejecución ...

Hola, tengo una duda, quisiera que me pudieran ayudar ya que tengo lo siguiente:
my %clientes = (
nombre => "Juan",
direccion => "framboyanes 17",
numeros => ,
);
my @telefonos = ($clientes{numeros});

Pero cuando hago un foreach() a teléfonos me imprime la dirección de memoria (ARRAYx012345)

¿Cómo puedo hacerlo? GRACIAS

Necesito un poco de ayuda con este script para el Perl API de EnsEMBL.

Cuando lo ejecuto en su forma original me devuelve el listado completo de homologías para la lista de genes y funciona aparentemente bien. Cuando sustituyo la línea correspondiente para que solo me liste los ortólogos de mamíferos no lo admite.

A ver si hay por aquí alguien con experiencia en esta API que me pueda ayudar. Gracias de antemano, majos.

...

Saludos, de casualidad me pueden ayudar diciéndome si existe algún módulo para convertir vídeos de wmv a mepg u otro.

Hola muy buenas, tengo un problema y esperaba que me ayudasen. Acabo de empezar a utilizar Perl y por tanto soy principiante, me han asignado un proyecto que trata de generar resúmenes. Estos serían más o menos como los que crea el propio Google al realizar la búsqueda, pero un poco más detallados. El otro día estuve mirando el módulo SAMIE para Perl, que es un robot navegador y el cual puede abrir Internet Explorer ...

Hola, soy nuevo es este mundo del Perl y por tanto de este foro. Para alguien que desconocía este lenguaje echando un vistazo hay cosas que son más que entendibles.

Pero el motivo que me hace escribir este post es una duda, me he encontrado con unas líneas de código que no termino de comprender y busco que alguien me pudiera orientar sobre este tema.

Este es el código y la parte que no entiendo ...

Hola,
Por favor, requiero su ayuda con esto de Perl, esta es mi duda:

Mi script debe básicamente rescatar algunas partes de este archivo de entrada y ponerlos en uno nuevo con un orden especifico, lo que ya conseguí =D. Mi problema empieza cuando requiero contar el número de veces que una variable tiene el mismo valor o significado, o sea, que el número de átomos (líneas) que tiene cada aminoácido ($temp).

Debo considerar solo ...