Foro - Perl en Español

«Un caso típico en donde puede ser necesario establecer un tiempo límite de respuesta es el de un servidor que se comunica con uno o varios clientes a través de la red.

El servidor envía mensajes a los clientes, y espera a que éstos respondan. Pero puede haber problemas de red, o bien alguno de los clientes no responde por alguna otra razón, y esto no debe bloquear la ejecución del servidor para el resto ...

«La función “alarm” de perl permite ejecutar una subrutina cuando ha transcurrido el tiempo que se le ha indicado como argumento.

Haciendo uso de ella, podemos implementar una función para solicitar una respuesta al usuario, pero si éste no responde pasado un tiempo, continúa la ejecución del script.»

Artículo

«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

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 ?

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

Ya comenzó el Calendario de Adviento de Perl Dancer 2012 (en inglés).