• Publicidad

Log de comandos Input_log en telnet

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Log de comandos Input_log en telnet

Notapor mulambo » 2007-10-26 13:17 @595

Hola, estoy interesado en saber cómo puedo pasar como parámetro el path donde se almacene el input log al hacer un telnet (estoy usando Net::Telnet).

Inicialmente intenté lo siguiente:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
$dirlog=$ARGV[0];
$telnet = new Net::Telnet (Input_log =>$dirlog);
print($dirlog);
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


pero al ejecutar perl c:\gen_lista_gris2.pl D:\resultadogris.txt desde DOS no hace nada.
mulambo
Perlero nuevo
Perlero nuevo
 
Mensajes: 22
Registrado: 2007-08-14 10:06 @462

Publicidad

Notapor explorer » 2007-10-26 13:50 @618

Desde Linux, sí que me funciona...

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
#!/usr/bin/perl
use Net::Telnet;
$dirlog = $ARGV[0];
$telnet = Net::Telnet->new(Input_log =>$dirlog);
print $dirlog;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

Si le paso un fichero como primer argumento, me lo crea con tamaño 0 (normal, porque no hay actividad durante el programa). Y al final me imprime el nombre que le pasé.

Pon el print antes de crear el objeto $telnet. Al menos, deberás ver que $dirlog debe valer igual que el primer parámetro al programa. Si no sale, el problema está en otro sitio...
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 3 invitados