I'm not sure why that's not working. Here's a sample from a script which does work:
Hope that helps.my $SwitchIP = '192.168.0.1'; my $password = 'seekrit'; my $t = new Net::Telnet::Cisco (Timeout => 10, Dump_log => 'dump.log', Input_log => 'input.log', Port => 2011, ); $t->open("$SwitchIP"); $t->login(Password => $password);
Update: I think see why your script isn't working. According to the Net::Telnet::Cisco docs, you need to issue a login command:
Your script seems to be correctly setting up the session, but you're issuing commands before you've logged into the router.my $session = Net::Telnet::Cisco->new(Host => '220.127.116.11'); $session->login('login', 'password');
If things get any worse, I'll have to ask you to stop helping me.