Foro - Perl en Español

Hola, soy nuevo en el tema de programación en general... obviamente también en Perl y tengo la siguiente pregunta:

¿Por qué cuando escribo algo como:

while ($linea = <STDIN>){
chomp $linea;}
print $linea;

la función print no imprime nada en la salida estándar?

Lo que intento hacer es asignar varias líneas (desde entrada estándar) a una sola variable.
Por ejemplo:
actg
ggct
aaaa
gtac
Todas esas 4 líneas adjudicárselas a la variable $linea.

De antemano, ...

«En determinadas ocasiones deseamos reemplazar texto dentro de un archivo, por ejemplo, cambiar en Documento.txt todo lo que diga “mi familia” por “nosotros”. Para lograr esto podemos usar nuestro editor de texto preferido (Kate, Gedit, SublimeText, etc) pero siempre es bueno conocer variantes, otras formas de lograr el mismo resultado :)

Sucede que con expresiones regulares se puede lograr esto, el comando sed es simplemente magnífico, tiene ...

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 ...