Foro - Perl en Español

Bueno, tengo dos duda sobre Expresiones Regulares, la primera es que necesito un buen concepto sobre esta función, sé cómo más o menos funciona pero sin un concepto concreto no lo domino mucho xD.

(?:....)

Y

Hola.


Ando teniendo una duda porque quiero codificar un archivo con palabras a codificación md5 por cada palabra, pero cuando los codifico se ven diferentes que si hubiese codificado una sola palabra a md5 sin usar archivo de texto.

¿Alguien me podría explicar por qué sucede eso y cómo lo arreglo?

«¿Qué es un Framework?
Es un conjunto de herramientas que están integradas o hacen comunicación entre sí para la resolución de un trabajo en
particular.

¿Qué es MVC?
Es una metodología o estilo para construir aplicaciones que divide la implementación en “Modelo”, “Vista” y “Controlador”. El modelo es la representación de la información con el cual el sistema opera. La vista representa el modelo en un formato de salida para interactuar con el usuario (GUI). ...

Hola.

Ando teniendo un problema porque quería extraer las variables de un formulario web y no sé cómo.

Pues estoy usando WWW::Mechanize y tengo ya el siguiente código.

$web = "http://127.0.0.1/libro.php";
my $mech = WWW::Mechanize->new();
$mech->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201 Firefox/2.0.0.12");
$mech->get($web);
my $rta = $mech->dump_forms($fh);


Devuelve

POST http://127.0.0.1/libro.php
html= (text)
venga=Enviar (submit)


Este código me extrae toda la información sobre el formulario desde variables hasta otros datos ...

Tengo el siguiente problema... (no de código, sino de funcionalidad del código que estoy generando)

Se tiene:
package Datos::Operaciones::Naturales;
use strict;
sub new{}
sub sumar{}
sub restar{}
sub dividir{}
sub multiplicar{}
1;

Por otra parte, para obtener estos datos, suma, resta, etc, utilizo lo siguiente...

package Reporte::Mostrar;
use strict;
# Aquí es donde comienza mi duda...
use Datos::Operaciones::Naturales;
sub new{}
sub Mostrar_Suma{
# Y hago la llamada así
Datos::Operaciones::Naturales::sumar();
}

Ahora bien, todo ...

Quería saber a través de algún ejemplo, cómo poder sobrecargar un constructor...
package Consulta;

sub new{
my($class,$dato)=@_;
my $self = {
dato=> $dato
};
bless $self,$class;
return $self;
}


sub new{
my($class,$referencia_dato)=@_;
my $self = {
dato=> $referencia_dato
};
bless $self,$class;
return $self;
}

sub operaciones{}...

package Main

....
my $variable = new Consulta("hola");
....
my $variable = new Consulta(\@un_arreglo);
...

¿Cómo el constructor de la clase Consulta sabrá a cuál entrar...? ¿O en ...

Bueno, es una tontería básica pero estoy empezando con perl y hacía tiempo que no programaba. A ver si me podéis echar una mano.

Tengo este fichero que es una prueba que estoy haciendo. En el fichero entrada tengo varias líneas separadas por ";" y que con la función split las voy guardando en variables para luego en el fichero salida mostrar las que me interesen. La cosa es que con este código me lo ...

La historia de lo sucedido hasta ahora, en Perl, en 4 minutos de vídeo.

Actualización: descubierto por Salva.

«Bah, llevo 10 minutos delante de este puto <textarea> pensando en cómo empezar este post y no soy capaz xD. En fin, a saco...

He hecho que irssi me notifique eventos por libnotify, incluso aunque esté ejecutándose en una máquina remota. Hace falta un poco de disciplina y me ha quedado un pequeño bug, pero nada de eso me preocupa mucho :).

Por un lado, gracias a ...

«Hola chicos y chicas, hoy vamos a aprender a configurar el formulario de Matt (FormMail.pl). Ahora puede que estéis muy lejos de conseguirlo pero siguiendo con cuidado una serie de pasos estaréis más cerca de conseguirlo.»

Artículo