Foro - Perl en Español

Hola perleros,

Tengo dos archivos de datos. El primero me indica el cromosoma, el nombre del gen (gene_symbol) y la posición central del gen en el cromosoma. Tengo 2000 filas. El segundo me indica el cromosoma, la posición inicial y final del gen y el identificador (ID) del gen. Tengo 35000 filas. Lo que necesito es obtener en un archivo resultante, el gene_symbol y su ID propio.

Para ello he pensado leer el archivo menor ...

Hola muchachos:

Es simple lo que deseo realizar. En definitiva: cambiar el número IP que entrega el ISP. Me he fijado que cuando al resetear el router, mi IP pública cambia, y deseo hacer lo mismo pero con un script en Perl. ¿Alguna idea?

Thanks ;)

Hola, tengo un gran problema para mi.

De repente Apache me ha dejado de funcionar. Pongo "maquina"/cgi-bin/prueba.perl y me sale

Internal Server Error

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator, root@localhost and inform them of the time the error occurred, and anything you might have done that may have caused the error.

More information about this error may be available in the ...

«He decidido como otro objetivo de el 2011 aprender un lenguaje de programación, hace tiempo había empezado con Perl, así que he decidido ponerme un poco serio con este tema ya que si quiero hacer de la informática mi fuente de ingreso, preciso estudiar y ponerme al día con las cosas. Lo primero y necesario son conocimientos de programación ya que he visto que lo piden para todo y deben tener su razón.»

Artículo

Hola a todos.

Quería saber si alguien conoce algún módulo para imprimir un texto con un formato determinado en una impresora de matriz de punto.

Si es en otro lenguaje distinto de Perl, bienvenido sea.

Gracias por anticipado y saludos.

«Para instalar los módulos desde CPAN necesitamos hacer uso del comando “cpan”, pero existen un par de problemas con este método: necesitamos tener permisos administrativos (quizás en nuestras máquinas no sea un
problema) y el otro inconveniente es que pueden existir conflictos entre las versiones de las librerías que descargamos y las que tengamos en nuestro sistema ya instaladas.
Pero existe una solución para esto, que nos ofrece la facilidad de instalar cualquier librería que ...

Hola a todos,

Llevo unos días intentando manipular un fichero comprimido muy grande (hablamos de unos cuantos gigas). Así que pensé en usar threads para procesarlo y mantenerlo en un formato comprimido, en este caso bzip2. El problema es que no puedo cargar todo el fichero en memoria para manipularlo, así que escribí un script de tal forma que el hilo principal vaya cargando paquetes de líneas según vayan terminando los hilos que hacen el ...

Los Perl 5 porters están actualmente trabajando en Perl v5.14.

Algunos de los próximos cambios son:

* Sustitución no-destructiva, con la opción /r, en s///r
* Transliteración no destructiva con tr///r y y///r
* Activar, por defecto, algunas opciones para las expresiones regulares
* Usar la opción /a para buscar por semántica ASCII
* Especificar cualquier carácter con su valor ordinal en octal
* Nuevos caminos para especificar números en binario, octal y hexadecimal
* ...

Buenas tardes,

estoy intentando realizar una consulta a una base de datos utilizando el módulo Net::MySQL, pero cuando realizo una consulta intentando filtrar los resultados con WHERE, el programa se queda bloqueado, como si estuviera pensando. En cambio si la consulta la hago sin WHERE, todo funciona bien.

Mi programa es el siguiente:

#!/usr/bin/perl -w

use Net::MySQL;
use strict;

my $mysql = Net::MySQL->new(
hostname => 'localhost', # Default use UNIX socket
database => 'XXXX',
user ...

Gente:
Estoy teniendo un problema, y probé de todo y nada me funciona.

método:

sub procesarUrls
{
my $self=shift;
my @urls=shift;
my @textos;
my $key;
my $value;

#print Dumper(@urls);


#for(my $i=0;$i<=$#urls;$i++)
foreach $value (@urls)
{
print "valor: $value \n";

#print "url: $urls \n\n";
#$self->getDataClarin($urls);
#$self->mostrarAtributos();
#push(@textos,$self->getText());
#$self->setText();
}
return @textos;
}


Invocación:

@urls=$esc->getLinkHome($html);
$esc->procesarUrls(@$urls);


probé pasarlo con @, con %, etc. pero no hay caso lo único que logro mostrar en la dirección ...