Foro - Perl en Español

¿Por qué no puedo usar ningún módulo , o instalarlo?

Al querer instalarlo:

Code: Seleccionar todo

perl Makefile.PL

me tira un error como este:

Code: Seleccionar todo

Can't locate HTML/LinkExtractor.pm in @INC (@INC contains: /usr/lib/perl5/5.10.0/i386-linux-thread-multi /usr/lib/perl5/5.10.0 /usr/local/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi /usr/local/lib/perl5/site_perl/5.10.0 /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.10.0 /usr/lib/perl5/vendor_perl /usr/local/lib/perl5/site_perl /usr/lib/perl5/site_perl .) at test.pl line 15.
BEGIN failed--compilation aborted at test.pl line 15.

Ya probé con más de 15 módulos y todos me tiran lo mismo, ya intenté con root, y todo.

Hola,

Tengo un problema con Perl... he realizado un script para transferir archivos vía ftp de un servidor a otro. El hecho es que me da error cuando se ejecuta la instrucción donde especifico la ruta origen.

Es un script muy sencillo, pero el problema es que recién estoy conociendo Perl y no tengo ni idea de cómo solucionar este problema.

Por favor si alguien puede ayudarme, el script es el siguiente:
#!/usr/bin/perl

use Net::FTP; ...

Hola,

Como verás estoy muy pez en esto de Perl.
Me gustaría usar el módulo PDF::Report pero me da error (Can't locate PDF/Report.pm in @INC). Lo he buscado pero no lo encuentro. Tampoco encuentro el programa ppm.exe ¿Cómo puedo instalarlo?

Muchas gracias.

Hola otra vez,

Tengo un problema con la ñ. Trabajo en UTF8 y al hacer un sort ordena mal la ñ ¿Alguien sabe cómo puedo solucionarlo?

Muchas gracias

Buenos días. Estuve probando la compilación con pp en Linux, pero resulta que al compilar me deja con el tamaño que menos imaginaba.

#!/usr/bin/perl

use LWP::Simple;

my $pagina = get('http://www.google.com/');

print $pagina;

<STDIN>;

El archivo google.pl pesa 112 bytes. Al compilar comprobé que ya pesaba 4.4MB ... jojojo...

Me sorprendí. Pregunto si no hay forma de reducirlo, o quizás esto es normal en Perl. Es porque en otros lenguajes no es así si no me ...

Este es mi primer mensaje en el foro, por lo que sirva también de presentación en el mismo.

Estoy intentando hacer un script de prueba para conectarme por FTP a un sitio, bajarme ciertos ficheros y desconectarme, todo ello usando el módulo Net::FTP.

Pero resulta que no puedo conectarme al servidor. En consola lo que me sale es esto:

Code: Seleccionar todo

No se pudo conectar al servidor at /home/sernamar/scripts/prueba.pl line 16.

El script prueba.pl es el siguiente: ...

Quiero hacer un proyecto en mi disco duro con Perl, y necesito saber qué programas, y cómo manejar el Apache para que mis scripts funcionen correctamente en el proyecto, sin errores y sobre todo que se visualicen correctamente, alguna sugerencia, por favor, mientras más detalles tengan para manejar Perl en mi PC, mejor. Uso Windows XP.

Los molesto porque en este caso tengo un script en bash el cual me da como resultado los usuarios de mi sistema asociados a los grupos creados en el mismo, me gustaría migrarlo a Perl.
¿Alguien me puede ayudar? o tienen alguna web donde pueda leer sobre esto.

Mi script:
http://pastebin.com/m4088c7ff

Saludos

¡Hola! Quería usar dos archivos de texto y guardarlos en un array.
Entonces cada array manejaría un archivo pero, ¿cómo podría hacer el bucle foreach para no tener que ponerlo y abrirlo dos veces?

Ejemplo:
open (NOMBRES, $nombre);
@nombre = <NOMBRES>;
close(NOMBRES);

open (APELLIDOS, $apellidos);
@apellido = <APELLIDOS>;
close(APELLDIDOS);

foreach $nombres(@nombre){
foreach $apellidos(@apellido){
print "$nombre $apellido";
}
}

Intenté probar:

open (NOMBRES, $nombre);
@nombre = <NOMBRES>;
close(NOMBRES);

open (APELLIDOS, $apellidos);
@apellido = <APELLIDOS>;
close(APELLDIDOS);

foreach ...

Buenas tardes.

Estoy leyendo un archivo xml con el siguiente código e imprimiendo el xml leído, pero el xml resultante no es igual, ¿alguien podría ayudarme?

#!c:/Perl/bin/perl.exe
use XML::Simple;
use Data::Dumper;
my $clientes = XMLin("testp.xml");
print XMLout($clientes,KeyAttr=>{},RootName=>'program', XMLDecl => '<?xml version="1.0" encoding="utf-8" ?>',
NoSort => 0,
KeepRoot => 1,);

Archivo xml entrante
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<appScripterApplication>
<name><![CDATA]></name>
<version>
<product>5.2.1.3205</product>
<file>1.0</file>
</version>
<program>
<node>
<nodeID>1000</nodeID>
<name><![CDATA]></name>
<subtype>8</subtype>
<xPos>36</xPos>
<yPos>180</yPos>
<appDataID>0</appDataID>
</node>
<icon>
<recordID>0</recordID>
<xPos>36</xPos>
<yPos>180</yPos> ...