Foro - Perl en Español

Hola estoy arreglando una función de este código :


#!usr/bin/perl
#Coded By Doddy H

use LWP::UserAgent;

my @agents = (
'Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:25.0) Gecko/20100101 Firefox/25.0',
'Opera/9.80 (Windows NT 6.0) Presto/2.12.388 Version/12.14',
'Mozilla/5.0 (Windows NT 6.2; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/32.0.1667.0 Safari/537.36',
'Mozilla/5.0 (compatible; MSIE 10.6; Windows NT 6.1; Trident/5.0; InfoPath.2; SLCC1; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 2.0.50727) 3gpp-gba UNTRUSTED/1.0'
);


my $nave = LWP::UserAgent->new; ...

Este sitio permite hacer un seguimiento a los cambios de tus módulos preferidos de CPAN. Por favor, regístrate para poder seguir más de un módulo a través de una simple fuente RSS.

perlmodules.net

Hola a todos y gracias por atenderme.

Estoy intentando hacer un programa en Perl que me permita realizar ping a un rango determinado de IP. Estaba pensando, en vez de ir haciendo ping de una a una, dividir el nº de IP en 5 listas y pasarle dichas listas a 5 hilos para que cada uno se encarge de realizar el ping a todos los componentes de su lista. El problema que tengo es que ...

Buenos días, tengo una PC como servidor de desarrollo (pruebas) el cual posee perl, v5.8.8 built for i386-linux-thread-multi. A estas fechas Perl ha evolucionado a otras versiones, les agradeceré me indiquen por favor cuál es la versión a la que me recomiendan actualizar porque he encontrado soluciones que requieren de una versión mayor. Gracias.

Estimados: Quisiera un poco de ayuda en el trabajo que estoy realizando, el cual consta de filtrar un archivo .txt, con más de 2 millones de datos que cuentan con la siguiente estructura:

(ID1,'TEXTO1','clasificacion1','user1','timestamp1','url1','código1),(ID2,'TEXTO2','clasificacion2','user2','timestamp2','url2','código2), ...

Dichos datos se encuentran almacenados en forma consecutiva separados tan solo por una coma ",", donde en ciertos sectores aparece un punto y coma ";".

De lo anterior, requiero generar un filtro mediante Perl para poder dejar tan solo los ...

Se ha anunciado la salida de Mojolicious v5.0.

Los cambios incluyen un rediseño de las excepciones y del sistema de páginas no encontradas. Validación de formularios. Protección frente inyección de código en formularios. Más soporte para sistemas de plantillas. Nuevo Mojo::DOM, con más formas de manipulación de HTML. Posibilidad de colgar enganches en más lugares del entorno. Mejor prestación del servicio web y de los tiempos de reinicio. Más seguridad con la rotación de contraseñas ...

¿Existe alguna relación entre PL/SQL y Perl? ¡ja,ja,ja! Quizás algo...

Hola, ¿qué tal, compañeros Perleros?

Tengo un conflicto ya que necesito realizar un insert SQLite de manera dinámica. ¿Hay manera de hacer esto? Les explico: en una propiedad tengo dos valores que contienen el nombre y el valor (los valores los obtengo de la web) y estas acciones las estoy realizando en un módulo .pm, lo que tengo es lo siguiente.


# mis propiedades
my @list = qw(letra_unit clave);

# Obtengo los nombres ...

Buenos días, a través de la siguiente consulta:

SELECT id,descrip_comp,fecha_sale,fecha_entra,id_causa,id_anexo FROM t_eventos te, c_tipo_componentes ctc, c_componentes cc WHERE te.subestacion='EDO' AND tipo_evento like 'ATENDIDO%' AND (fecha_sale BETWEEN '2013-01-01 00:00:00' AND '2013-08-31 23:59:59') AND indice='S' AND te.id_tipo_componente=ctc.id_tipo_componente AND ctc.id_componente=cc.id_componente GROUP BY id,descrip_comp,fecha_sale,fecha_entra,id_causa,id_anexo ORDER BY descrip_comp,fecha_sale;

id | descrip_comp | fecha_sale | fecha_entra | id_causa | id_anexo
-----+--------------+---------------------+---------------------+----------+----------
260 | COMPONENTE1 | 2013-05-24 15:57:00 | 2013-05-25 14:23:00 | PAIS |
266 | COMPONENTE2 | 2013-07-29 18:23:00 | ...

(Traducción libre de este artículo en inglés)

Firmas de subrutinas

Lo más llamativo. Es difícil de darse cuenta de lo importante que es esto. Se acabó el código feo en la asignación. Con v5.20 puedes escribirlo así:
use feature 'signatures';

sub eco_habitacion ($sonido) {
return $sonido;
}

Desreferencia postfija

La siguiente, nueva y fresca característica es la desreferencia postfija. Difícil de describir pero fácil de mostrar:
use experimental 'postderef';

my $array_anidado_ref = [[[[]]]]; ...