Re^7: telnet from a cisco telnet

Dont know why its not working ...frustrated...i read the documentation of cmd() it is used to pass the commands to the remote host....thank u

use Net::Cisco;
my $t =Net::Telnet::Cisco->new(Host=>'10.0.0.1');
my @output;
my $tl=0;
$t->login('9190','KUM@R425');
$t->print('telnet 192.168.203.23')or $tl=1;
$t->waitfor('/Please enter password: /');
$t->print('public');
$t->waitfor('/]> /');
@output=$t->cmd("show system");
print @output;
$t->waitfor('/]> /');
$t->print('exit');
open(CONFIG,">config.txt");
print CONFIG "@output\n"; 
close(CONFIG);
$t->close;
[download]

Comment on Re^7: telnet from a cisco telnet Download Code

Replies are listed 'Best First'.
Re^8: telnet from a cisco telnet by Corion (Patriarch) on Aug 10, 2011 at 08:08 UTC
Please re-read the documentation of `->cmd` and look for the `Prompt` option to `->cmd`. Your secondary device likely needs a different prompt than your first (Cisco) device. Also see the section on Debugging in Net::Telnet.	[reply] [d/l] [select]