Foro - Perl en Español

Estimados, mi consulta es la siguiente:

Resulta que estoy tratando de descargar un archivo que usa conexión SFTP. Estoy tratando de usar la librería Net::SFTP::Foreign pero al autentificar me pide la librería IO/Pty.pm, pero lamentablemente no la puedo instalar porque uso Windows y con Perl Package Manager no la encuentro.

¿Qué otras opciones puedo tener? Podré instalar por otro lado esa librería o instalar otro paquete que la traiga o usar otra librería. Gracias de ...

Amigos de Perl en español, espero tengan el mejor de los días y si no, desde ya se los deseo. Tengo una duda: ¿cómo puedo saber en qué posición de una matriz está situado un valor? En este caso, por ejemplo, algo así.

my @m=qw(jan feb mar apr may jun jul aug sep oct nov dec);
Y deseo buscar en qué posición aparece una variable
my $i="may";
# aquí necesito saber en qué ...

Hola, ¿qué tal? De nuevo me dirijo a ustedes ya que he comenzado a trabajar con archivos XML y tengo un ligero problema... Verán, desde el navegador obtengo un archivo XML el cual valido, pero me arroja errores cuando trata de validar XML con addenda. Si el XML tiene estructura simple la valida sin problemas y se puede guardar en la base de datos. Mi teoría es que posiblemente el módulo que utilizo no valida ...

He probado de todas las maneras posibles que he encontrado: con cpan, desde la consola y a mano. El módulo es POE::Component::IRC.

A mano cuando hago perl Makefile.PL, me aparece esto:

Warning: prerequisite IRC::Utils 0.12 not found.
Warning: prerequisite List::MoreUtils 0 not found.
Warning: prerequisite POE 1.311 not found.
Warning: prerequisite POE::Component::Syndicator 0 not found.
Warning: prerequisite POE::Driver::SysRW 0 not found.
Warning: prerequisite POE::Filter::IRCD 2.42 not found.
Warning: prerequisite POE::Filter::Line 0 not found.
Warning: ...

http://dev.perltuts.com/

Tutoriales.

Probar Perl en línea (dentro de una sandbox) Perl 5 ¡y Perl 6!

Libros recomendados.

Bueno, pues el reto (que más que reto es curiosidad) consiste en hacer un programa que muestre su propio código fuente.

NOTA: El código más corto gana.

Estimados, primero que todo felicitarlos por el foro, ya llevo algunas semanas siguiéndolos y la verdad soy nuevo en este mundo, pero gracias a ustedes pude aprender a cómo respaldar la configuración de equipos Cisco con el módulo Net::Telnet::Cisco.

Ahora mi problema es el siguiente: necesito buscar en los respaldos un argumento (por lo general éste da inicio al párrafo que deseo mostrar) y que me muestre en pantalla el párrafo completo en el cual ...

Saludos al foro. En esta ocasión acudo a ustedes para pedir un poco de ayuda en un tema que no logro solucionar :oops:

Tengo un formulario el cual hice en PHP, y ejecuta un Perl pasando los parámetros en una variable de la siguiente forma:

$comando = "./config.pl $parametros";
La ejecución del "config.pl" la hace perfectamente, los parámetros los leo en el documento Perl y los ...

Un cordial saludo.

Alguien que me pueda orientar sobre cómo desarrollar un servicio web en Perl, haciendo uso de Apache. Estuve indagando y lo más cercano que encontré a lo que quiero hacer es algo como esto:

use JSON;
use Data::Dumper;

$json = '{"nombre":"jero2528","ip":"200.1.223.58","interfaz":"GigabitEthernet1","serviceid":99998,"accion":"cancelar"}';

$text = decode_json($json);
print Dumper($text);


Básicamente quiero recibir como parámetro el JSON indicado anteriormente, pero no sé cómo hacer para guardar por ejemplo este .pl y que sea ...

Hola. Tengo el siguiente código

use IO::Socket;

my $hostname = "localhost";
my $port = "6667";
my $nombre = "dsadsa";

if (
my $socket = new IO::Socket::INET(
PeerAddr => $hostname,
PeerPort => $port,
Proto => "tcp"
)
)
{

print $socket "NICK $nombre\r\n";
print $socket "USER $nombre 1 1 1 1\r\n";
print $socket "LIST\r\n";

print " Spammer Online\n\n";

while ( my $log = <$socket> ) {
print $log;
}

}

Lo que hago es poder ...