Foro - Perl en Español

Aparte de los paquetes Perl que ya están disponibles en la distribución normal de Debian, es posible obtener más a través de:

• http://debian.pkgs.cpan.org/, aunque no siempre tienen la última versión
  
• dh-make-perl, un comando que permite realizar el proceso de bajar el módulo desde CPAN y convertirlo, en el momento, en un paquete Debian, aunque en ocasiones hay problemas con los números de versión

En este artículo (en inglés) se explica otro método para actualizar ...

El proyecto CPAN-Explorer nos ofrece unas impresionantes vistas de la comunidad Perl.

Existen 3 vistas: por distribuciones, por autores, y por la propia comunidad, en forma de webs enlazadas.

Y no... no he encontrado a este sitio web en ese mapa :( al menos, todavía :) .

Si alguien se ha preguntado cómo de grande es la comunidad Perl, ...

Hola. El caso es que tengo un documento que se llama Storage Alternatives for Mobile Computers (1994) y hay que conseguir convertirlo a Storage\ Alternatives\ for\ Mobile\ Computers\ \(1994\) pues si no, no puedo acceder a el desde el programa. ¿cómo puedo hacerlo? Pues he probado:

$nombre="Storage Alternatives for Mobile Computers (1994) ";
$nombre=~s/ /\ /g;
$nombre=~s/)/\)/;
$nombre=~s/(/\)/;

y no me funciona. ¿Alguien me podría ayudar? ¡¡¡Gracias!!!

Hola,

Hace algunos días me uní al projecto (buck-security) que lleva a cabo Martin, de Austria, en Perl.

Se trata de un script que busca fallos de seguridad comunes en servidores (por ahora, Debian Lenny) y de paso, intenta explicarle al usuario en qué consiste cada check, algo así como bastille (programa).

Está pensado para saber dónde estamos parados con respecto a la seguridad, cuando se nos hace administrador de un servidor.

Invito a los ...

Hola,

Tengo el siguiente código:
open LANGFILE, 'locale' or die $!;
my @lines = <LANGFILE>;
close(LANGFILE);
if ($string =~ m/es_ES/){
my $langt = "es";
print "es \n";
}

Mi problema es que no funciona. El archivo que abre tiene este texto: es_ES y aun así da como que no encontró esa expresión. ¿Quizás es porque $lines es un escalar?

Help me. :(

Hola, Perleros.
Tengo una duda que llevo varios días dándole vuelta y no he podido resolverla.
A ver si me explico:

En un programa de Inserción de registros (Altas) a una tabla de MySQL, tengo algo como esto:

$sex = "Masculino";
$sex = "Femenino";

# alta de alumno
print "<form action='alta3_alumnos.pl?fec=$dt&fam=$fam&nivel=$nivel&cod=$doc&last1=$last1&last2=$last2&first=$first&cod=$cod&types=$types&ciclo=$ciclo&CGISESSID=$CGISESSID' ID='form1' onsubmit='return verificar();'>";
print "Alumno............: ";
print textfield('alumno', '' ,15,25);
print "<BR>";
print "Apellidos..........: ";
print textfield(last1, '' ,50,50);
print textfield(last2, '' ,50,50);
print ...

¿Que función tiene este código Perl?
y si es inseguro para mi PC.

Se ha detectado un error en la validación de certificados en la clase IO::Socket::SSL del modulo IO::Socket::SSL de Perl. El fallo permitiría a un atacante remoto eludir restricciones de seguridad a través de un certificado especialmente manipulado.

La nueva versión v1.26 corrige el problema.

Hola a todos.

Tengo este problema que me está matando, este es el escenario.

Si yo hago esto: ls -l obtengo lo siguiente.

-rw-r--r-- 1 netrac netrac 2928 jul 8 18:47 file1.pl
-rw-r--r-- 1 netrac netrac 2928 jul 8 19:07 file2.pl
-rw-r--r-- 1 netrac netrac 2928 jul 8 19:10 file3.pl

Ahora bien, lo que necesito solamente son los archivos que fueron accedidos >= 19:00. Por ej.
-rw-r--r-- 1 netrac netrac 2928 jul 8 19:07 file2.pl ...

Buenas, estoy haciendo un script para cuando reciba un mail tome valores dentro de ese mail y los guarde.

Está hecho bien tomando todo los valores cuando el email viene de forma normal sin reemplazo de texto, ni nada de eso. La cuestión es que hay veces que recibo mail con caracteres cambiados; por ej..

el '=' lo reemplaza por =3D cuando la linea es muy larga se corta se le agrega un '=' y ...