Foro - Perl en Español

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 ...

Buenas,

Estoy analizando unos archivos y ahora me he encontrado con uno un poco particular, con una estructura así:

USR VADER, DARTH...... 8871 7601 2011-01-30 2012-01-28
USR2 SKYWALK, LUKE..... 2249 1200 2011-08-24 2011-08-21 2011-05-13

Las columnas, como se aprecia, siempre van en la misma posición, es decir, tienen un tamaño fijo. La separación entre las columnas, son espacios (\s).

He intentado hacer algo como
my($c1,$c2,$c3,$c4,$c5,$c6,$c7) = split /\s+, $_;

Pero no funciona, ya ...

Existe una web donde se puede ver de forma esquemática todas las distribuciones de CPAN: Map of CPAN.

Su autor ha comentado que ha publicado un vídeo con los gráficos de CPAN de este último año y medio.

Curioso ver el crecimiento de algunas áreas.