Foro - Perl en Español

Tengo las siguiente líneas , y quiero ordenarlas cómodamente en un array para usar después. El problema es que me tira varios errores por las comillas, y necesito que todas esas comillas estén sí o sí para después abrir el array y mostrar línea por línea.

test'--
'or'1'='1
'or'
' or 0=0 --
" or 0=0 --
or 0=0 --
' or 0=0 #
") or ("a"="a
hi" or "a"="a
hi" or 1=1 --
hi' ...

Hola:

Estoy tratando de analizar dos strings obtenidos mediante unos objetos GtkEntry. Puedo mostrar los valores mediante print() y salen perfectos. Sin embargo, trato de analizar su contenido y no hace nada. Mi intención es comprobar si tiene el formato 00:00:00.

Mi idea de código es:

if ($entrada !~ /::/) {
print "No me gusta\n";
}

¿Qué estoy haciendo mal?

Muchas gracias por vuestra ayuda.

Falkom

Hola,

Esto es una duda muy básica y seguramente será algo sutil que se me ha pasado leyendo los manuales.
¿Qué diferencia hay entre my ($var) = 0; y my $var = 0?

Un abrazo y muchas gracias.

Falkom

Buenas tardes compañeros,

tengo una pequeña cuestión con la que no he podido localizar respuesta alguna.
Necesito poder leer una frase que se ha introducido en un cuestionario html, desglosar esa frase en cada una de las palabras que la forman, y luego asignarles una variable a cada una de dichas palabras.



#!/usr/bin/perl
use CGI;

my $q=new CGI;
my $consulta;

print $q->header("text/html");
print $q->start_html(-title=>"Tu pregunta");
print"\n";

$consulta =$q->param('consulta');

# aquí desglosaría la pregunta ...

Hola compañeros, estoy teniendo una duda a la hora de usar LWP. Actualmente tengo un script que necesita consultar datos de una página web, y parsear esa respuesta en XML. Generalmente la respuesta es grande, más o menos unas 2000 líneas.

El servidor al cual le hago las peticiones usa Transfer-Encoding: chunked, y muchas veces el content del request, viene con caracteres extraños colocados "al azar" como una string "\r\n1ff8\r\n" o "\r\n994\r\n". Creo yo que ...

Hola a todos:

Estoy desarrollando una serie de scripts para administrar sistemas y me he encontrado con un curioso error.
Obviamente, hasta que coja la debida soltura, empleo:

use stricts;
use warnings;

pero tengo una duda muy tonta. Suelo declarar las variables con my() siempre que quiero usarlo en el ámbito de la función; sin embargo, algunas las quiero globales y tal como he visto en algún manual, sin poner my(), debería ser global. Mi ...

Hola,

Tengo un archivo de alineamiento en formato SAM que tiene un encabezado y una sucesión de líneas con varios campos, os muestro un trozo:

@HD VN:1.0 GO:none SO:coordinate
@SQ SN:APB LN:360
@RG ID:I245 SM:Sample_Mult_1
@PG ID:AA PN:DataAnalyzer VN:2.6
@CO Sequencing System.
APB 0 APB 42 255 41H23M1P6M1P4M1P5M1P6M1P6M1P12M1P5M1P2M1P15M1P2M1P59M1P23M1P2M1P2M1P2M1P7 * 0 0 AGCTTAGCTTGGAAAGCCTCACCTCTTACTTTTCCATTGAGTCATCTACCAAAGGA * MD:Z:319 NM:i:0
HEWCEEE01A0C7I 0 APOBex26_M13 42 255 41H23M1P6M1P4M1P5M1P6M1P6M1P12M1P5M1P2M1P15M1P2M1P59M1P23M1P2M1P2M1P2M1P7M1P * 0 0 AGCTTAGCTTGGAAAGCCTCACCTCTTACTTTTCCATTGAGTCATCTACCAAAGGAGATGTCAAGGGTTCGGTTC * MD:Z:319 NM:i:0
HEWCEEE01A2AQM 0 APOBex26_M13 42 255 41H23M1P6M1P4M1P5M1P6M1P6M1P12M1P5M1P2M1P15M1P ...

«He decidido compartir el pequeño script hecho en Perl que tengo por aquí escondido (pasado por un compañero de trabajo hace tiempo). Se trata de un script que bajo ejecución efectúa un cambio de password del usuario en ejecución, normalmente nos interesa esto para el usuario root.»

Artículo

Hola,
quisiera hacer un script en Perl que me permitiera descargar los genes de Neandertal y Homo Sapiens de Gene Onthology con sus coordenadas en un documento en el escritorio.

Pues... a 10 de febrero, 9.832.654 de teléfonos registrados.

¿Y cómo se saca esa cifra si la empresa no la da?

Pues con un poco de ayuda de Perl, naturalmente.