Foro - Perl en Español

Hola amigos, parece una cosa muy sencilla, pero he estado buscando en Google durante mucho rato y sigo sin resolverlo.

Quiero usar una expresión regular pero pasándole variables, ej:
my $prueba1 = "Hola";
my $prueba2 = "Adios";
my $texto = "Hola, Hola, Hola";
$texto =~ s/$prueba1/$prueba2/g;
print $texto;

Y la salida debería ser: "Adios, Adios, Adios". Pero no sale nada.

Esta claro que no está interpretando las variables, o las está interpretando como texto ...

Hola buenas noches, soy nuevo en el foro y este es el primer hilo que coloco. Cabe resaltar de antemano que estuve verificando otros hilos a ver si conseguía solución a mi inconveniente y desafortunadamente no fue así.

Bueno, mi inconveniente radica en que tengo unas tablas de una herramienta ya existentes y en ellas necesito hacer unas consultas para generar unos reportes; estoy haciendo un pequeño desarrollo con el módulo DBI para conectar y ...

¡ Hola de nuevo !

Tenía una pregunta para vosotros. El caso es quiero hacer un open() para leer (parsear) un archivo externo que tengo en una URL (http://www.mysite.com/file.txt), tal y como lo haríamos en local, tipo:

open FILE, file.txt

¿Hay alguna forma de hacer esto en Perl sin usar pm externos? Es para un check de Nagios y tiene que ser un script muy portátil sin tener que ...

Hola tengo un archivo con el siguiente estilo de filas por columnas:
2L bound_moiety=MED(+) intron 4336355 4336361 3.8 + . ID=intron_FBgn0020762:1_FBgn0020762:3;Name=Atet-in;Parent=FBtr0077427;parent_type=mRNA
2L bound_moiety=MED(+) intron 4334989 4334995 3.0 + . ID=intron_FBgn0020762:1_FBgn0020762:3;Name=Atet-in;Parent=FBtr0077427;parent_type=mRNA
2L bound_moiety=MED(+) intron 4334462 4334468 2.9 + . ID=intron_FBgn0020762:1_FBgn0020762:3;Name=Atet-in;Parent=FBtr0077427;parent_type=mRNA

Quisiera poder saber si existen grupos de coordenadas a distancia menores de 50 bp teniendo en cuenta las coordenadas de las columnas 4 (inicio) y 5 (fin), y si es positivo poder guardar un archivo ...

Buen día a todos los perleros.

Hoy se me presentó un problema. He estado realizando una resta de fechas con Date::Manip y delta_format(), pero con el formato más completo de fechas GMT.

Sucede que sí la realizo y luego ese resultado lo sumo, pero muestra días y horas incorrectos. Así que decidí realizar las sumas y restas solo en segundos y luego convertirlos en fechas y tiempos. Pero no sé cómo.

Voy a dejar el ...

Hola.

Ando queriendo usar el módulo Tk en Ubuntu 10.04 usando Virtualbox. Acabo de instalar los
paquetes Tk necesarios pero, de todas formas, al intentar cargar el código siguiente no se muestra
ninguna ventana.

El código es el siguiente:

use Tk;

my $ne = MainWindow->new();

$ne->title("hola mundo");

MainLoop;

¿ Alguien me puede ayudar ?

Hola buenas. Estoy tratando de hacer funcionar este ejemplo de SOAP::Lite pero me está dando un error cuando ejecuto el cliente. Me fijé en el cuadrante de versiones y la versión del módulo funciona con la del Perl que tengo instalada...

Si alguno sabe o le pasó lo mismo se lo agradeceré…

Esquema instalado:
Perl v5.12.3
Soap::lite v0.712 (el ppm muestra como que está bien instalado)

Error del cliente:
C:\Documents and Settings\admin>perl c:\cliente.pl
Can't locate ...

Tengo las siguientes líneas:

open(PASS, "< archivo.txt");
my @contenido = <PASS>;
foreach my $linea (@contenido)
{
if($linea =~ m/amigos de perl/)
{
print $linea;
}
}
close(PASS);

archivo.txt

referencia archivo.txt

hola
amigos de perl
en español

salida por pantalla:

amigos de perl


Lo que necesito es que si el script encuentra la cadena de búsqueda, en vez de imprimir la línea en la que está contenida esa cadena, imprima la primera línea, para que ...

Hola buenas, es mi primer post y no sé si iría aquí...

He leído un post bastante similar al mio pero creo que trabajaba desde Linux :S

La cosa es que me gustaría coger el código fuente de una web o el formulario XML que me devuelve al introducir una URL...

Me gustaría guardarlo en un archivo o una variable para después buscar un número xx,xxx dentro de ese archivo o variable.

Había pensado hacerlo ...

Estoy utilizando este módulo para acceder como cliente a un web service. Todo anda correcto, la llamada al servicio y la devolución de los datos esperados como respuesta.
Recibo los datos(los veo en el log), pero no sé cómo accederlos a partir de la variable $response. No comprendo la estructura del hash devuelta.

El único inconveniente que se me presenta es con la respuesta recibida: pongo en practica los ejemplos que presenta el autor en ...