Foro - Perl en Español

Hola.

Tengo esta duda: ¿es necesario aprender antes Perl5 a fondo antes de dar el salto a Perl6 o para el que empieza es mejor empezar directamente con Perl6 para acostumbrarse a la nueva sintaxis?

Un simple script en Perl para sacar un screenshot y subirlo a Imageshack.

El código:
#!usr/bin/perl
#DH ScreenShoter 0.1
#Coded By Doddy H
#ppm install http://www.bribes.org/perl/ppm/Win32-GuiTest.ppd
#ppm install http://www.bribes.org/perl/ppm/Crypt-SSLeay.ppd

use Win32::GuiTest
qw(GetAsyncKeyState GetForegroundWindow GetWindowText FindWindowLike SetForegroundWindow SendKeys);
use Win32::Clipboard;
use Time::HiRes "usleep";
use LWP::UserAgent;

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);

$|++;

my ...

Buenos días, expertos de Perl en Español, acudo nuevamente a ustedes debido a que tengo una complicación bastante compleja, la cual googleé, he incluso busqué en el foro, con resultados negativos.

Tengo una matriz de la siguiente manera.
my @vmatriz=qw(val1 val2 val3 val4);
Tengo un archivo de texto el cual paso a una variable matriz de la siguiente manera:
use strict;
use warnings;
my @a=glob("*.txt");
foreach$a(@a){
open(A, "$a");
my @L=<A>;
foreach(@L){
# aquí ...

A partir de hoy y durante varios días publicaré un pequeño tutorial para los que quieran probrar este framework.
El ambiente de trabajo que he usado para hacerlo ha sido un PC con Arch Linux (https://www.archlinux.org/); Kernel 3.7.8-1; MySQL 5.5; Catalyst 5.90020

Lección 1. Instalación de las herramientas necesarias: Catalyst Framework, MySQL...
Instalación de Catalyst
Si se usa Debian/Ubuntu se puede instalar desde apt-get, aunque no contaríamos con la ...

¿Es posible utilizar una interfaz gráfica como el IDE de C# donde es muy fácil añadir botones, label, gridview y demás controles? Es decir, uno crea la interfaz gráfica con C# y luego al pulsar un botón, ejecutar un código Perl y el resultado de ese código mostrarlo en la interfaz de C#, pasando los datos a través de sockets a C#. ¿Sería posible eso? Así no tendría que utilizar ni Tk, Gtk ni wxPerl. ...

Hola.

¿Cómo sería un script en Perl que escribe un valor en una dirección de memoria, y tenga otro script para leer ese valor de esa dirección?

¿Cuál es la instrucción en Perl para poner datos en la memoria RAM y poder leerlos, para así poder intercambiar datos de un script a otro utilizando la memoria RAM como puente?

No sé si existe algún tipo de variable especial que se utilice para eso, o alguna ...

Hola.

Quiero aprender a programar en modo gráfico, he estado mirando y me ha gustado wxperl, pero mi duda es si no se nada de wxperl, no será mejor aprender primero Tk para asimilar los conceptos y luego pasarme a wxperl? Es que encuentro más documentación sobre Tk y más ejemplos que sobre wxperl. A ver qué podéis aconsejarme sobre el tema, yo lo que quiero es tenga mucha documentación para poder aprender. Normalmente la ...

Estoy usando el módulo HTTP::Proxy para tener un servidor proxy. Realizo ciertas consultas con post donde subo imágenes, el script larga el siguiente error:

Content-Length header value was wrong, fixed at C:/Perl/lib/LWP/Protocol/http.pm
line 189.

El problema es que no quiero arreglarlo. Mi idea es cómo evitar este error, en la documentación del módulo no encuentro ninguna opción como debug=0 o algo así.

¿ Alguien me puede ayudar ?

Un simple script para mandar mensajes de correo a donde quieran. Para usarlo necesitan una cuenta en Gmail. Lo nuevo de esta versión es que usé otro módulo que hace que el script no tenga tantas dependencias como en la última versión.

El código:
#!usr/bin/perl
#DH Bomber 0.2
#Coded By Doddy H

use Win32::OLE;

head();

print "\n Host : ";
chomp( my $host = <stdin> );

print "\n Port : ";
chomp( my $puerto ...

Hola a todos,

Tengo un problema curioso que resolver y que me está quitando el sueño. Necesito conseguir una expresión regular que capture solo 20 caracteres de estructuras como las siguientes.

>palabrasuperlarga_2_189137

/^>(\w+)/ -> Así capturo la palabra en $1, pero no limito el número de caracteres a 20

/^>{1,20}$/ -> Así no me funciona, y no le paso nada a $1, sino a $& (pero tampoco rescato nada en la variable)

/^>{20}$/ -> ...