Foro - Perl en Español

Vídeo (en inglés) de los primeros pasos para usar el depurador integrado de perl.

Ando queriendo saber si el módulo HTTP::Proxy me podría dar la posibilidad
de capturar el contenido de la web cargada para poder realizar una modificación para
posteriormente devolver ese resultado a la página. Sería como el funcionamiento del famoso
programa achilles.

El código que tengo es este:


use HTTP::Proxy;

my $test = HTTP::Proxy->new(port=>8080);
$test->host();
$test->start();

En la documentación no he encontrado lo que quería o, más bien, mi inglés no es muy bueno... ...

Hola, quería preguntar si había alguna posibilidad en Perl de poder
crear un array con nombre generado automáticamente.

Por ejemplo, tengo este código

for my $n (1..3) {
# ???
}

Me gustaría poder crear varios arrays con el nombre de un número. Es
solo un ejemplo, si es posible, me gustaría poder usar push() para agregar valores.

¿ Es posible hacer esto ?

Hola, estuve mirando el código de redirección para los avisos en el Squid.

La idea es implementar algo parecido pero sin tiempo_de_aviso, es decir, que cada petición que el usuario hace, mostrarle la página que solicito más el aviso. No sé si me explico. Obviamente sería dentro de un frame y demás. No sé si se podrá hacer...

Gracias.

Hola, tengo un script y lo que quisiera hacer es guardar en una variable el número de parámetros que contiene el script, y también quisiera hacer, que me mostrara por pantalla el primer y último parámetro del script.


Saludos, Zyonx

Hola, quiero instalar el módulo Gtk2::WebKit en Ubuntu 10.04, no tengo experiencia instalando módulos bajo Linux, intenté descargarlo con el gestor de paquetes Sinaptic pero no lo encontré, pensé en instalarlo bajándolo de CPAN, pero no conozco bien los pasos.

¿ Alguien me podría ayudar ?

Llevo intentándolo bastante tiempo y me es imposible descargar una página HTTPS.

Esta es una de las últimas formas que he intentado, con un socket proxy:

http://search.cpan.org/~scr/LWP-Protoco ... l/socks.pm

#!/usr/local/bin/perl
use strict;
use LWP::UserAgent;

my $ua = new LWP::UserAgent(agent => 'Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.0.5) Gecko/20060719 Firefox/1.5.0.5');
$ua->proxy( => 'socks://socks.yahoo.com:1080');
my $response = $ua->get("http://www.freebsd.org");
print $response->code,' ', $response->message,"\n";
my $response = $ua->get("https://www.microsoft.com");
print $response->code,' ...

Estimados,
Los molesto para consultarles si conocen algún módulo que me permita generar una imagen de una URL. El típico "alt + impPt"

Algo como esto: http://www.url2jpg.co.uk/ pero mediante consola, donde yo pueda ingresar qué URL quiero que me capture.

Saludos.

Hola, estoy usando el módulo DBI, y quisiera hacer un select de un registro y mantenerlo lockeado mientras realizo otras operaciones, para luego ejecutarle un update al mismo.

¿Cómo puedo hacerlo usando DBI?

Gracias.

Hola amigos del foro. Nuevamente recurro a ustedes para que me ayuden. Les cuento, tengo exactamente 347 archivos de 151x71 (extensión .dat). Tengo que concatenarlos en una matriz tridimensional por lo que quedaría así: 151x71x347. Utilizo el siguiente script de Perl "llamando" a Octave siguiendo el primer ejemplo de este link http://www.mathworks.com/products/matlab/demos.html?file=/products/demos/shipping/matlab/nddemo.html

#!/usr/bin/perl -w

my %hash;
my $i = 1;

while ($data = </home/lis/Escritorio/QS/DATOS/u/*.dat>) {

if ($i) {
$hash{$data} = $i;
}
$i++;

if ...