Foro - Perl en Español

Hola gente, ¿qué tal? Bueno, como es mi primer post, me presento ante ustedes, Me llamo Martín y soy de Argentina. Hace unos días, mis jefes me pidieron que realice un upload de archivos (en Perl) con barra de progreso, el problema es que no logro comprender muy bien la sintaxis de Perl y no me da el tiempo como para leer un buen tutorial o el libro de Perl. Ahora bien, recurro a ustedes ...

¡Hola!

Estoy programando en Perl bajo Windows (no por gusto) en algunas ocasiones, y nunca había necesitado emplear ningún módulo que no estuviera incluido en la base de ActiveState, pero ahora sí que necesito uno.

Y PPM no es capaz de salir a Internet, supongo que por el proxy, ya que es una simple conexión al puerto 80 y eso en el firewall corporativo lo tengo abierto.

¿Sabéis cómo le puedo configurar el proxy? Lo ...

Hola maestros

Me podrías ayudar, con el uso de los threads y el consumo excesivo de memoria y de procesador .

Mi intención es la de ejecutar threads de forma paralela hasta un máximo $ThreadsMAX en (Windows).

El problema es que dependiendo de los valores de @URLs y de $ThreadsMAX se me dispara el consumo de memoria de forma descontrolada.

¿Dónde puedo leer acerca del uso de los threads o explicarme el porqué de lo ...

use Bio::SeqIO;

sub conteo_palabras_genoma_completo
{
my ($infile,$out_intergenic_file,$min_intergenic_size,$max_intergenic_size) = @_;
my ($n_of_intergenic,$gi,$start,$end,$length,$strand,$taxon) = (0);
# print "ingrese el nombre del archivo:\n";
# $infile=<STDIN>;
# chop($infile);
my $in = new Bio::SeqIO(-file => "NC_002755.gb", -format => 'genbank');
open(SALIDA,">conteo_genoma_completo.txt");
open(LIDER,">lider.FASTA");
open(COMPLEMENTARIA,">complementaria.FASTA");
while( my $seq = $in->next_seq) # scan all sequences found in $input
{
my ($gbaccession,$sequence,$gen,@genes) = ( $seq->accession() );
$sequence = $seq->primary_seq()->seq() ||
'no encuentro la secuencia primaria, necesito un fichero GenBank completo!';
$taxon = '';

for ...

Soy nuevo en el foro, estuve buscando información relacionada en el foro y vi que hay varios posts pero quería consultarles sobre un script que encontré en Internet.

En el sitio:
http://www.dreamincode.net/forums/topic ... b-crawler/

Encontré el siguiente script:

use LWP::UserAgent;
use HTML::LinkExtor;
my @urls = ('http://www.misitio.com.ar/index.html');
my %visited; # The % sigil indicates it's a hash
my $browser = LWP::UserAgent->new();
$browser->timeout(5);

while (@urls) {
my $url = shift ...

¡Hola!

Supongamos que tengo un texto al que se han añadido etiquetas morfológicas/sintácticas y otro semejante que hay que etiquetar. Combino ambos textos en formato interlineal, una línea debajo de la otra. Así:


El(A) día(S) comenzó(V) con(P) viento(S-CCM) y(C) lluvia(S-CCM) en(P) Madrid(S-CCL).
El día había comenzado bien, con lluvia en Madrid.
La(A) jornada(S) se presentaba(V) ideal(A-CCM) para(P) salir(V) a(P) buscar(V) setas(S-OD).
La jornada pintaba muy bien para salir al campo.

La segunda línea (o ...

«En el Taller de (bio)Perl ya apuntamos una manera de averiguar la genealogía de los términos GO, pero dadas las limitaciones del módulo GO::Parser aquí os muestro una manera más eficiente de extraer el significado y la genealogía de cualquier identificador de la GO, que puede pertenecer a una de las 3 ramas fundamentales de la jerarquía (proceso biológico, función molecular y localización celular).»

Artículo

¡Hola!
Mira, tengo que presentar una exposición sobre algo nuevo, que tenga que ver con la bioinformática. Puede ser algún descubrimiento, o algo novedoso que tenga que ver con esto. Tiene que ir representado en un artículo y no sé si ustedes me puedan colaborar con algún artículo que hayan leído relacionado con esto que sea interesante.

Hola nuevamente, estoy haciendo un script que me imprima la cantidad de resultados de buscar una cadena de texto en diferentes buscadores, pero como sugiere el título tengo un problema con las expresiones regulares... Lo que se me ocurrió fue hacer algo así:

if($url =~ /resultCount">(\d+\.?\d+\.?\d+\.?\d+\.?\d+\.?\d+\.?\d+\.?\d+\.?)/) { print "$1 resultados para \"$search\" en Yahoo.\n"; }

La variable $url tiene dentro la página donde se encuentran los resultados. Yahoo y los demás buscadores separan los ...

Hola a todos:
Tengo una aplicación en la cual, una vez al mes, entran simultaneamente de 10-20 usuarios a utilizar un mismo programa y por lo que he leído, este programa se carga de 10-20 veces en memoria, abre de 10-20 veces la misma base de datos de MySQl y todo lo hace de 10-20 veces, haciendo lento el proceso.

Leyendo por allí me encontré que a través de FastCGI, puedo optimizar esto a una ...