Foro - Perl en Español

Hola, buenos días. Tengo un script que lo uso para extraer asignaciones taxonómicas de lo obtenido con qiime. Está desarrollado para extraer cada asignación por separado de los archivos obtenidos en el formato de Silva y el de GreenGenes. Sin embargo, en la línea
my @kingd=($taxon_value=~m/D_0__(.*);D_1|k__(.*);p__/g);
que es donde está las opciones para los dos formatos, tengo un problema que me arroja este mensaje: Use of uninitialized value $_ in pattern match (m//) at ...

Estoy haciendo un constructor de frases 'aleatorias' usando palabras sueltas. La forma más sencilla que yo sé es crear varios archivos de texto con verbos, adjetivos, etc., y en el código validar con varios if(), de modo que la frase quede con el mayor sentido posible, usando las condiciones. Por ejemplo:

Si el primer elemento de la palabra es "El", lo siguiente no puede ser casa o, si sale "Casa", el verbo no puede ser ...

Saludos, ¿alguien conocerá cómo crear un foro en perl? ¿Utilizando postgreSQL como base de datos?

Gracias.

Buenas de nuevo.

Tengo un problemilla y no sé cómo continuar, o más bien, qué es lo que estoy haciendo mal.

Tengo dos ficheros, uno contiene información de personas, como 'dni', 'nombre', etc., en un fichero plano separado por ",". Lo vamos a llamar 'fichero.txt' y el otro solo contiene el DNI. Lo llamamos Dni.txt.

En el primer fichero existen 50 registros y en el segundo fichero 10 registros cuyos DNI aparecen en el fichero ...

Salarios medios
Perl $139,214
C++ $133,954
C $133,691
Java $131,962
C# $129,692
JavaScript $126,988
PL/Sql $126,177
SQL $126,532
PHP $124,475
Artículo (en inglés)

Hola a todos.

Tengo algunas dudas sobre cómo ejecutar tareas en paralelo con Perl. Comúnmente realizo lo anterior empleando las herramientas que proporciona el módulo Parallel::ForkManager. Sin embargo, he observado que cuando se crean los procesos hijos hay un consumo excesivo de memoria.

He aquí un ejemplo de la parte de un programa que utilizo para ejecutar subprocesos:
my $fork= new Parallel::ForkManager($ncpus);
foreach (0..$#proc) {
$fork->start and next;
my ($index1, $index2) = split ...

Hola, requiero crear una interfaz vía web entre Linux, PHP y LOTUS NOTES para mostrar un documento creado en Lotus. ¿Es posible esto?

Hola, buenos días. Tengo este código en Perl que modifiqué de acuerdo a lo que requiero de uno ya existente, para extraer secuencias usando el ID en un archivo .txt. Sin embargo, el archivo de salida me arroja las secuencias con los ID del archivo.txt y yo lo que quiero es que salga todo el nombre original de cada secuencia.

>Z85.T_1177507 Z85s 9PG0M:00018:00019 orig_bc= new_bc= bc_diffs=0
ACTGAGACACGGTCCAGACTCCTACGGGAGGCAGCAGTGGGGAATGGGTTGTAAAGCACTTTCAGTAGGGAGGAAAACTTGGGAATTAATACCCCCCAA
>X89.T_24577341 X89s 9PG0M:00022:00033 orig_bc= new_bc= bc_diffs=0
CGATTACTAGCGATTCCGACTGAATTGCAGACTCCAATCCGGATTTGCTTCCCCTCGCGGGCTTGCGACCCTCTGTGCCGACCATTGTAGCACGTGAGTA ...

Al poner en mi código open(...) or die("No se pudo abrir el archivo < archivo.txt, $!"); simplemente se cierra si quito el archivo de la carpeta.
Y cuando solo pongo $! en die es lo mismo. También he intentado poner || en lugar de 'or', pero da igual.

No sé si esa sea la estructura correcta. Estoy usando ActivePerl 5.20.

use strict;
use warnings;
use genLetras;

for my $i ( 1 .. 30 ) {
for my $j ( 1 .. 30 ) {
generarLetra();
$matriz = $letra;
}
}

for my $i ( 1 .. 30 ) {
for my $j ( 1 .. 30 ) {
print "[$matriz] ";
}
print "\n";
}

<>;

No me funciona el programa. Al ejecutarlo como perl -c dice que falta instalar ese módulo (genLetras.pm), ...