netmaster
07-03-2006, 12:10
Hallo.
Der Titel ist etwas seltsam, da nicht musste, wie ich mich kurz fassen sollte. :D
Ich habe ein kleines Problem bzw. will mir etwas die Arbeit erleichtern.
Folgender Sachverhalt:
Ein Client soll per telnet auf einen Server verbinden. Und nun vom Server eine
Telnet-Verbindung zu einem Router.
Auf dem Server darf ich keine Scripte hinterlegen und vom Client komme ich
auch nicht direkt auf den Router.
Die Verbindung mit Perl (Net::Telnet) vom Client auf den Server klappt.
Wie komme ich nun weiter auf den Router mit meinem Script auf dem Client.
Soweit ist mein Script:
#!/usr/bin/perl
use strict;
use Net::Telnet;
my $telnet = Net::Telnet->new('IP-Server');
$telnet->login('user','passwort');
my @lines = $telnet->cmd('who');
print @lines;
$telnet->cmd('telnet IP-Router');
Habe im Netz leider nichts gefunden was mir weiter hilft.
Vielleicht hat ja jemand von euch eine gute Idee.
Noch zur Info:
Client --> Windows 2000/XP
Server --> Unix
Router --> Cisco
Danke schon mal im Voraus.
Der Titel ist etwas seltsam, da nicht musste, wie ich mich kurz fassen sollte. :D
Ich habe ein kleines Problem bzw. will mir etwas die Arbeit erleichtern.
Folgender Sachverhalt:
Ein Client soll per telnet auf einen Server verbinden. Und nun vom Server eine
Telnet-Verbindung zu einem Router.
Auf dem Server darf ich keine Scripte hinterlegen und vom Client komme ich
auch nicht direkt auf den Router.
Die Verbindung mit Perl (Net::Telnet) vom Client auf den Server klappt.
Wie komme ich nun weiter auf den Router mit meinem Script auf dem Client.
Soweit ist mein Script:
#!/usr/bin/perl
use strict;
use Net::Telnet;
my $telnet = Net::Telnet->new('IP-Server');
$telnet->login('user','passwort');
my @lines = $telnet->cmd('who');
print @lines;
$telnet->cmd('telnet IP-Router');
Habe im Netz leider nichts gefunden was mir weiter hilft.
Vielleicht hat ja jemand von euch eine gute Idee.
Noch zur Info:
Client --> Windows 2000/XP
Server --> Unix
Router --> Cisco
Danke schon mal im Voraus.