Foro - Perl en Español

Hola, ¿qué tal? Tengo un problema que ya busqué en Internet y no he podido encontrar cómo solucionarlo. Se trata de cómo puedo ejecutar un script Perl dentro de un archivo PHP pasándole unos parámetros. Espero me puedan ayudar.

¡Hola!

Estoy intentando trabajar con varios archivos XML.
Lo que quiero es leer nodos de varios archivos y copiarlos en otro.

Para hacerlo primero he probado a hacerlo cogiendo los nodos de un único archivo (introducía su URI directamente como un string) y pegándolos en otro. Ha ido todo bien.

Después, he pasado a guardar las URI de los archivos de origen en un array y con un bucle repetía el proceso anterior sacando en ...

Buenas tardes, soy nuevo en este foro. Estoy utilizando Perl para hacer un script que vaya sacando información de distintos sitios web y mediante expresiones regulares ando analizando la información.

El problema es que me encontré con un tag que no puedo analizar y quería ver si me podían ayudar.

<a href='javascript:changeFirstPhone(1, 1, 3664275, 1, {"phones":});' class="noLinkDetalle" id="fono_detalle1">(2) 7919481</a>

Tengo que sacar el número que se encuentra al final delante de </a> ¿alguna idea? ...

Muy buenas,

Estoy intentando administrar un script que se ejecuta continuamente para proporcionar failover a un sistema bajo IPCop. Este script es un bucle que se ejecuta cada n minutos, donde n es un parámetro que deseo configurar desde el cgi y que se modifique en el script a través de la lectura de un fichero de configuración. Para realizar esto necesito detener el script, que lea el nuevo parámetro y se ejecute en consecuencia. ...

Hola a todos :)

He estado trabajando con blast de forma remota para anotar genes y todo funciona bien, pero cuando le mando un archivo con muchas proteínas me genera un archivo por cada resultado, por lo que se me generan demasiados archivos en el ordenador, yo sólo necesito un sólo archivo donde se almacenen todos los blastreport. ¿Se puede de alguna forma?

Ocupo la función blastreport->save_output($filename), ...

Una nueva versión de Perl v5.16, ya disponible en vuestro CPAN y MetaCPAN más próximo.

¡A descargar!

Perl 5.16.2 representa aproximadamente dos meses de desarrollo desde Perl 5.16.1 y contiene aproximadamente 740 líneas de cambios a lo largo de 20 archivos por parte de 9 autores.

No hay grandes cambios con respecto a Perl v5.16.1. Un par de errores corregidos, nada más. Por ejemplo:

Hacer que /\h/ sea equivalente a //

Hola, buenos días. ¿Alguien me podría decir cómo se instalan los módulos en Perl? Me pasaron los ppm:

ppm install http://www.bribes.org/perl/ppm/Win32-API.ppd

ppm install http://www.bribes.org/perl/ppm/Win32-GuiTest.ppdAquí tomé otras fotos. Esto fue lo que me salió al instalar los tres módulos. No sé qué errores son esos.

Win32::api
http://subefotos.com/ver/?c4b1c99d0f73d ... 7dffbo.jpg

Win32::GuiTest
http://subefotos.com/ver/?8a94fa7284a12 ... 2d541o.jpg ...

«Perl es un lenguaje que es muy cómodo de usar si hay que procesar algún fichero, como por ejemplo un HTML, el problema que voy a resolver en este post, es el de extraer una toda una etiqueta div que está identificada por un id, del tipo <div id="identificador"> ... </div> el objetivo es extraer todo el contenido. »

Artículo

Hola,

Imagínense que tengo varios ficheros html hijos, que tengo que insertar en determinadas líneas dentro de un fichero html padre.

¿Cómo se afrontaría esto? Que yo sepa no existe la orden insertar, habría que poner algún nombre o frase (comodín) en el fichero padre para que cuando Perl lo leyera con un simple print() o say() copiara el contenido del fichero hijo.

No sé si habrá algún módulo CPAN para montaje de ficheros (en ...

Estoy tratando de parsear un XML que es generado mediante la utilización del método HTTP POST.

#!/usr/bin/perl
use LWP::UserAgent;
use HTTP::Request;
use XML::Simple;
$xml = new XML::Simple;

for ( $i = 1; $i < 10; $i++ ) {
print "Probando $i\n";
$url = "http://localhost";
$query = "$variable=1$i";
$ua = LWP::UserAgent->new;
$ua->agent("Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt)");
$req = HTTP::Request->new( POST => $url );
$req->content_type('application/x-www-form-urlencoded');
$ua->timeout(30);
$req->content($query);
$response = $ua->request($req);
$content = $response->content();
$data ...