Foro - Perl en Español

Hola, saludos.

Tengo un problema que me está desesperando un poco:

Lo que pasa que mi sistema tiene una parte donde se pueden subir archivos, ya sea documentos, fotos, archivos .zip, etc.

El problema radica en que cuando quiero visualizar en mi web un archivo .docx, .xslx, etc, ya subido previamente, me da el siguiente error.

System error
error: '<&' without matching '&>' at /proj/ptc/Mason/dev/customer/uploads/7353/Test_test_tsttst.docx line 59
context:
...
code stack: /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Lexer.pm:422
/usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Lexer.pm:127
/usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Lexer.pm:99
/usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Compiler.pm:214 ...

¿Qué tal...? Tengo una duda... Tengo un archivo multifasta con más de 10.000 secuencias y quiero ejecutar un programa que se llama "sixpack" pero solo me deja introducir una sola secuencia... con su respectiva salida.

¿Cómo podría hacerle con un código en Perl para poder meter las 10.000 secuencias pero que cada vez que encuentre un ">" vuelva a ejecutar el programa y la salida también tenga otro nombre?

Gracias

Muy buenas,

Me gustaría averiguar cómo debería plantear una expresión regular para que solo se analice palabras completas.

En principio la tengo planteada así:
/\b<expresión-regular>\b/

"<expresión.regular>" es una expresión regular cualquiera, esa parte no es importante.

La cuestión es que me funciona para todos los casos menos cuando aparecen caracteres con acento, que al parecer están dentro del subconjunto "\b".

Por ejemplo, si tenemos la palabra "Analítica" y queremos detectar las palabras "tica" que aparecen, ...

Hola a todos,

He intentado hacer como práctica un programa para jugar al "AHORCADO". Pero aunque el programa funciona relativamente, tengo un problema crucial con el control de los fallos. Resulta que cada letra introducida para ver si esta en la palabra secreta, me es reconocida como fallo a excepción de la primera letra de la palabra secreta. Es decir, que hay un descontrol en el bucle encargado de controlar los fallos. No soy capaz ...

El reto consiste en hacer un programa que muestre un tablero de ajedrez (no importa mucho la calidad de la presentación), en donde se deberán colocar ocho reinas, de tal manera que todas ellas no se amenacen entre sí.

Hay muchas formas de resolver este problema.

Se puntuará la originalidad y el uso de técnicas informáticas (algo que sea más que los simples bucles y sentencias condicionales.

¡Hola a todos!

Okay, necesito crear un script que me permita generar un reporte del estado del servidor y que sea recurrente, cada 10 minutos...

La verdad, para serles sincero, soy nuevo en esto, apenas estoy comenzando y me interesa mucho.

He leído acerca de sar y crontab, ahora bien, ¿cómo los puedo combinar a ambos en un mismo script Perl...

Desearía crear un script que me permita generar un reporte del estado del servidor ...

Tengo un archivo con el siguiente formato:
Familia Nombre cobertura resolución
1 bovin 0.8 1.2
1 human 1 2.5
1 ecoli 1 2
2 ecoli 0.7 1.5
2 mouse 1 3
5 human 1 2.7
Necesito, para cada Familia distinta (1, 2 y 5), la línea con mejor cobertura (número más próximo a 1) y como segundo criterio, mejor resolución (más próximo a cero). La salida deseada sería:
Familia Nombre cobertura resolución
1 ecoli 1 ...

Hola a todos, tengo un pequeño programa en Perl que debería generar números de 0.01 a 1 aumentando de 0.01 en 0.01. Funciona bien para valores de 0.01 a 0.81 pero después de este valor, en vez de generar 0.82 obtengo 0.820000000001 y no sé de dónde sale ese 0.0000000001 adicional. Pongo el código, es realmente muy sencillo pero no entiendo que está pasando.
$w=0;
for ($i=0;$i<=100;$i++)
{
print "omega--> $w \n";
$w=$w+0.01;
}

Y ...

Hola a todos.

Quiero quitarle a una cadena de texto todos los espacios, saltos de línea, vueltas de carro y tabulaciones extra, es decir, cuando existan dos o más.

Estaba intentando solo con los saltos de línea y usé estos códigos pero no me funcionaron correctamente.

$texto =~ s/\n\n*//g;
$texto =~ s/\n{2,}//g;

Gracias de antemano ;D

Hola... En una variable que tiene un contenido como este:

http://www.youtube.com/watch?v=LGOIzsNZaPQ

Necesito cambiar ":" por "%3A" y así con "/", "?" y "=".

Sólo quiero saber el procedimiento que habría que hacer...

Gracias de antemano :D