Foro - Perl en Español

«Mediante la programación multihilo, un programa puede ejecutar simultáneamente distintas tareas, optimizando el uso de los recursos disponibles en el sistema y disminuyendo el tiempo total de ejecución. Así, mientras un hilo puede estar ejecutando un proceso intensivo de cálculo, otro hilo puede estar realizando una operación de entrada/salida a disco. Un tercer hilo puede estar realizando una consulta a una base de datos que quizá reside en otro servidor, y un cuatro hilo puede ...

«En otro artículo de este blog hemos comentado la manera de leer una página web utilizando el módulo perl LWP::UserAgent disponible en CPAN.

Pero puede ocurrir que el equipo en el que trabajamos no tenga acceso directo a internet, y sea necesario enviar la solicitud a través de un proxy server. En este artículo explicamos la manera de establecer la conexión a través de un proxy en nuestro script perl.

En este caso, podemos llamar ...

«En el lenguaje de programación Perl, podríamos escribir los números del 1 al 15, usando la forma básica con un arreglo, o bien, podríamos hacer uso de la forma más económica siguiente, usando el operador rango»

Artículo

«Bien,le hice otra pequeña actualización al programa de una vez,ya que voy ha estar ocupado los próximos días, no es una versión completa, ya que puede que haga 4.5.1,4.5.2, etc. para corregir errores de ésta, así que lo que le he añadido es lo siguiente: 1. Cambié algunas cosas de la interfaz para que se vea mejor: 4.5: 4. antes 2. También añadí los conocidos accel. Que...»

Artículo

Hola a todos...
Antes que nada me presento: soy n3td1srupt, joven de 15 años pues interesado en programación y el mundo del hacking :) ...

Bueno, esta duda la he buscado por Internet y no he visto nada relacionado. He encontrado en esta web diferentes soluciones para integrar PHP y perl, pero no sé si esto es lo mismo...

Veréis: estoy diseñando o tengo en mente más ...

Ja, como regalo de navidad les dejo el script navideño xDDD.

El código


#!usr/bin/perl
#El script navideño
#Coded By Doddy H

while(true) {

my($dia,$mes,$anio,$hora,$minutos,$segundos) = agarrate_la_hora();

unless($dia eq "25" and $mes eq "12") {
syswrite STDOUT," Fecha y hora : $dia/$mes/$anio $hora:$minutos:$segundos \r";
} else {
syswrite STDOUT,"\n\n Feliz navidad !";
<stdin>;
exit(1);
}

}

sub agarrate_la_hora {

my ($a,$b,$c,$d,$e,$f,$g,$h,$i) = localtime(time);

$f+= 1900;
$e++;

return($d,$e,$f,$c,$b,$a);

}

#The End ?

Bueno, siempre quise hacer una botnet en Perl. Logré programar una bien básica que tiene las siguientes opciones:

Ejecución de comandos
Simple GetIP
Listar procesos activos
Matar procesos
Listar archivos de un directorio
Borrar un archivo o directorio cualquiera
Leer archivos
Abrir y cerrar lectora
Ocultar y mostrar programas del escritorio
Ocultar y mostrar Taskbar
Mandar mensajitos molestos
Abrir Word y hacer que ...

Traduccion a Perl (mega buggeada) del script que hizo Javier de PortalHacker para poder leer los mensajes privados y listar las categorías de un foro SMF.

El código:


#!usr/bin/perl
#SMF Manager 0.00001
#Coded By Doddy H

#ppm install http://www.bribes.org/perl/ppm/HTML-Strip.ppd

use LWP::UserAgent;
use HTTP::Cookies;

use HTML::Strip;

my $nave = LWP::UserAgent->new(
cookie_jar => HTTP::Cookies->new(),
requests_redirectable => ,
timeout => 5,
agent =>
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);

print qq( ...

Ya está en marcha el Calendario de Adviento de Perl 6 de este año (en inglés).

Calendario de Adviento 2012 (en inglés)

Podéis uniros a su fuente RSS y seguirlo en Twitter, en la cuenta @PerlAdvent