Thread telnet commandos absetzen (11 answers)
Opened by Rambo at 2006-01-27 13:45

Rambo
 2006-01-27 14:55
#37027 #37027
User since
2003-08-14
803 Artikel
BenutzerIn

user image
habe das script angepast und die fehler meldung ist lediglich
server>command timed-out at E:\PERL_PRGS\telnet\rh_t2.pl line 15
es sieht so aus als ob er einfach den 2ten befehl nicht abschickt aber warum?

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
use strict;
use warnings;
use Net::Telnet();

my $host = '10.10.11.5';

my $t = Net::Telnet->new(Host => $host,
Timeout => 10,
Input_log => *STDOUT,
Output_log => *STDOUT,
) or die Net::Telnet::error();

$t->cmd("help") or die $t->error; #das ist Zeile 15
$t->waitfor('/SW2K-FRAFAC-P4_4750>/') or die $t->error;

$t->cmd("cli help") or die $t->error;
$t->waitfor('/SW2K-FRAFAC-P4_4750>/') or die $t->error;


merci
rambo

Ps. @renee was machen die waldbrände, bist du von betrofffen oder sind sie in deiner nähe?

View full thread telnet commandos absetzen