Foro - Perl en Español

Estimados, nuevamente escribo para consultar sobre un script de Perl que, aunque un poco viejito, me pareció muy útil.

El script recibe la dirección del remitente en $ARGV, el número de teléfono como $ARGV y el cuerpo del mensaje en STDIN.

Sólo debemos recibir un mensaje por usuario, luego envía el cuerpo del mensaje al dæmon gnokii-smsd para su envío por sms.

El inconveniente que tengo es que al recibir el correo formateado en HTML, ...

Un vídeo que vi hace rato.

Hola:

Estoy intentando conectar mi script MySQL pero no hay manera.
Tengo instalado MySQL en una máquina remota y mi código es el siguiente:

my $database = "Datagrabs";
my $dsn = "DBI:mysql:database=datagrabs;host=x.x.x.x:3306";
my $user = ";prueba";
my $pwd = ";password";

my $dbh = DBI->connect($dsn,$user,$pwd, {PrintError => 0})
or die "Couldn't connect to database: " . DBI->errstr;
Pero no hay manera.
Es muy simple pero me da el siguiente error.
Couldn't connect to database: ...

Estoy haciendo una función para cargar varias páginas al mismo tiempo.

use threads;

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

print toma("http://www.google.com");

sub toma {

my $hilo = threads->new(\&tomarapido($_);
$hilo->join();

sub tomarapido {
return $nave->get($_)->content;
}

}

La primera pregunta de muchas es cómo arreglo la línea esta:

my $hilo = threads->new(\&tomarapido($_);

¿ Alguien me podría explicar cómo lo hago ?

P.D. : a simple ...

Cómo implementar una caché de páginas en un sitio web en Perl.

«Un sitio web cuyas páginas son generadas dinámicamente mediante un script CGI puede resultar lento. En este artículo se explica un mecanismo para guardar en una cache en disco las páginas preprocesadas, de manera que cuando vuelven a ser solicitadas, el servidor web las entrega leyéndolas directamente del disco, sin necesidad de volver a generar el contenido mediante consultas a una base de ...

Estaba viendo este página que ofrece un servicio que necesito hacerlo en Perl: http://www.roubaixinteractive.com/PlayG ... o_Text.asp

La pregunta es: ¿cómo convierto texto normal a binario y de binario a texto normal?

¿ Alguien me podría dar un ejemplo ?

Yo sé que ya existe en el foro un panel de Bolsa de Trabajo, pero ¿por qué no tener un panel o un área especifica que se llame:
Oferta de desarrolladores y programadores Perl o Programadores Perl Freelance
Buscando programadores Perl
Postúlate como desarrollador Perl
Currículos programadores de Perl (este me gusta)
?

Ya que este foro es el más popular de programadores de Perl de habla hispana, la idea es un panel exclusivo para ...

Buenas tardes, maestros. Les comento: estoy realizando algo para poder realizar un autologin (algo así como lo que expone explorer al final de este artículo). He entendido la mayoría del código que ha expuesto, sin embargo he tratado de implementar el código pero en una conexión HTTPS que tiene errores con el certificado (ya logré omitir el error), sin embargo no he logrado llegar a registrarme y que me redireccione, solo me quedo en la ...

Estoy usando un componente en Delphi que me permite usar las expresiones regulares de Perl en Delphi. El problema es este: necesito sacar todos los nombres de esta línea:
Bot #locos :locos
Bot #locos :SYSTEM 1370177575
Bot = #locos :Bot Test Now

El código en Delphi este:
PerlRegEx1.Regex := '(.*?) = '+sEdit3.Text+' :(.*?)';
Como ven necesito sacar todo lo que le siga a ':', que vendría a ser los nombres. Mi código solo ...

¿Cómo puedo unir dos expresiones regulares para que en una sola línea me traiga los dos datos que deseo?

Tengo esta cadena:
var lat = 3.43575165;
var lon = -76.54623305;
var companyId = '15721119';
var companyName = 'RESTAURANTE';
var cityId = 'gfghj';
var cityName = 'ghfg';

y con este código obtengo lo que tiene el var lat
my ($latitude,$longitude) = $content =~ m/var lat \=(.+?)\;/;
$longitude = $content =~ m/var lon ...