Foro - Perl en Español

Tengo las siguientes líneas:

for my $i ( 1 .. 9 ) {

$p = ( 0 + $i - 1 );
if ( $i > 3 ) {
$p = ( ++$p - 3 );
}
if ( $i > 6 ) {
$p = ( ++$p - 3 );
}
if ( $i > 9 ) {
$p = ( ++$p - 3 );
}

print $p, " ";

}


salida: ...

Hola, buenos días a todos.

Teniendo todo casi listo pero me encuentro que en el ppm no aparece Gtk2::GladeXML para poder instalarlo.

Paso siguiente: bajo Gtk2-GladeXML-1.006, lo dejo en una carpeta descomprimido, voy al ppm trato de adjuntar la carpeta como repositorio local pero no encuentra nada, por eso os pregunto qué puede estar pasando o cómo puedo instalar Gtk2-GladeXML-1.006 en Windows.

Esto es por si a alguien le pasa el mismo problema que a mi...

Instalé Glade 3 3.6.7 y cuando arrancaba me daba un error de vínculos dinámicos y nombraba a la librería libglib-2.0-0.dll.

La solución que encontré fue copiar esa dll y todas las demás que están en la carpeta bin/ a la carpeta superior. Está claro que es algo cavernícola una solución así pero me funcionó y quería compartirlo ya que me quitó ...

Hola, soy nuevo en esto de Perl. He estado buscando por el foro mi duda pero no la he encontrado, por eso he creado este nuevo tema.

El caso es que quiero descargar solo el texto de una página web. He probado con:
system ('wget "http://www.paginawebdejemplo.com" > salida.txt');
system ('wget -o salida.txt "http://www.paginawebdejemplo.com" ');

Y con diferentes opciones de wget pero no consigo dar con la solución.

Por eso pregunto a los sabios del ...

Se descubrió una falla de seguridad en la versión v1.16 de Mojolicious, por lo que se recomienda a todos los que estéis usando este entorno de trabajo web, que lo actualicéis inmediatamente.

Aviso del autor (en inglés)

¿Qué tal, gente? Es mi primer post en el foro. Soy nuevo en el mundo de Perl.

Estoy renegando con un script en Perl desde hace unos días ya. Es por eso que les pido su ayuda. El problema es el siguiente:

Tengo el log de dansguardian (filtro de contenidos) con el siguiente formato:

"2011.4.14 6:15:01","-","192.168.203.1","http://www.google.com","","GET",""
"2011.4.14 6:15:01","-","192.168.203.5","http://www.otro.com","*DENIED","GET",""

Lo que necesito es dividirlo en campos según "", para que quede algo así (tomo de ejemplo ...

Estoy trabajando con una cadena y tengo que introducir un 0D antes de una subcadena. Lo estoy haciendo así:

$desc =~ s/EVN/\015EVN/g;
$desc =~ s/PID/\015PID/g;
$desc =~ s/PV1/\015PV1/g;

pero me coloca el 0D y luego el 0A he tratado de quitarlo mediante

$desc =~ s/\x{0A}EVN/EVN/;
$desc =~ s/\x{0A}PID/PID/;
$desc =~ s/\x{0A}PV1/PV1/;

Pero continua dejando el 0A, por cierto estoy trabajando en DOS.

¿Cómo eliminar el último carácter de una variable con expresión regular?

De antemano, muchas gracias.

Agradecería una guía simple de cómo instalar módulos CPAN bajo entorno Linux. Mi idea es dejar de utilizar el comando cpan nombre_modulo y COMENZAR a compilarlos en el mismo servidor utilizando: Perl Makefile.Pl ... y todo lo demás, pero tengo varias dudas de cómo esto se hace. No resulta, tira muchos errores, y tampoco funciona la instalación forzada: el módulo no anda.

Agradecería muchísimo si me indicasen lo siguiente:
1)- Donde buscar la versión del ...

Buen día,

Me ha parecido fantástico el foro, soy nuevo en Perl; me ha parecido fantástico al igual que sus aportes, me han servido muchísimo pero ahora tengo un problema: estoy realizando mantenimiento a una aplicación que se encarga de leer un archivo .xls; éste a su vez crea un archivo temporal con el siguiente código...

open( OUTFILE, ">$dir/$fname" ) or die print "No se puedo leer el archivo...";
binmode(OUTFILE); #Para no tener problemas ...