Foro - Perl en Español

Hola

Bueno, intentando aprender más sobre Perl, intenté hacer un "Proxy Checker" más rápido que los que hay en Internet.

¡Y qué mejor que ocupar Socket! LWP/request, Agent, me parecen buenos, pero no sé si será una noción personal pero se demoran más que los Sockets.

Bueno, el código en sí funciona perfecto, cuando un proxy funciona, éste no se demora más de 2 o 3 segundos en informarte que el proxy funciona, perooo...

Cuando ...

TORONTO--(BUSINESS WIRE)--CSS Inc., un líder en gestión de equipos de infraestructura remota, lanzó hoy la última adición a su familia de soluciones ampliamente implementada, ComViewIPw. Como una de las herramientas de gestión de redes más innovadoras hasta la fecha, ComViewIPw brinda una opción rentable, flexible y poderosa para la monitorización segura, el acceso, el control y la recolección de datos de todos los equipos a través de una infraestructura de redes distribuida.

Las infraestructuras de ...

hola, ¿qué tal? Soy nuevo en Perl y me encargaron un trabajo en el que tengo que ver qué archivos hay dentro de un directorio. Quería saber si me pueden ayudar a resolver esto.

Muchas gracias.
Saludos.

Muy buenas,
Desde hace muy poquito me he puesto a aprender y a hacer cositas con Perl y me he encontrado con esta duda que os paso a explicar a continuación (a ver si soy capaz de escribirla)...

- Yo voy leyendo de un directorio una serie de ficheros de log.

- De esos ficheros me interesa coger cierta información por lo que decido hacer el famoso m// (adjunto macheo completo)

if (m/\"\\".+nodeName\=(+).*\&mnn\=(+).+\&msisdn\=(+).*\&HTTP_USER_AGENT\=(+).+JSESSIONID\=+\"\s+\"+\"\s+\"(+)/);

Una vez ...

Hi.
Primero que nada felicitar por gran foro¡
Bueno ya he estado casi un día entero para ver el porqué de mi problema o en qué me estoy equivocando... espero que me ayuden :=)

Quiero hacer un Programa en Perl claro, en donde uno pueda subir las imágenes automáticamente, vía Post. (es un Formulario el Upload)

Contenido del Post cuando subo una imagen:

Code: Seleccionar todo

-----------------------------2249721855655\r\n
Content-Disposition: form-data; name="upfile_0"; filename="idea_bulb_400.jpg"\r\n
Content-Type: image/jpeg\r\n
\r\n
ÿØÿà

Gracias a Request ...

Hola de nuevo, estoy haciendo un programa que me genera un archivo y como este finalmente pesa mucho necesito comprimirlo y que quede en formato zip, he utilizado la librería Archive::Zip, y el programa me crea el archivo .zip pero no está agregando el archivo que necesito que comprima, es decir, al final me crea un archivo zip ¡¡pero vacío!! :( , aquí adjunto el código que ...

Saludos, con una molestia, necesito hacer un programa que busque texto dentro de una imagen tif, debido a que contamos con más de 2 millones de imágenes está difícil hacerlo a mano, ¿alguien sabe de alguna función o alguna manera de hacerlo en Perl? :shock:

Dentro de poco... primer Spanish Perl WorkShop

¿Te interesa?

Veréis, tengo la siguiente duda:

Estoy haciendo una web que utiliza un programa hecho en Perl situado en mi servidor web.

El caso es que ese programa en Perl recibe un parámetro (obtenido mediante un textarea de la página) y lo trata.

He probado a hacer un pequeño programa en Perl de prueba, y utilizando la función exec en PHP he conseguido ejecutarlo enviándole el parámetro del textarea.

Pero sin embargo mi programa grande (que ...

Bueno tratando de hacerme un sencillo chequeador de URL, escribí el siguiente código.

#!/usr/bin/perl -w
use strict;
use LWP::UserAgent;
use HTTP::Request;
use Parallel::ForkManager;

print "Trabajando...\n";
my $archivo_links = $ARGV;
chomp($archivo_links);
open LINKS,"$archivo_links" or die "No se encuentra el archivo.... \n";
my @links = <LINKS>;
close(LINKS);

my $ua = LWP::UserAgent->new;
$ua->agent("Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt)");
my $timeout = 30;
my $bots = 5;
my $start = 0;
my $pm = new Parallel::ForkManager($bots);
open CODE, ...