Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re^4: Telnet Cisco routers

by IvanAK (Acolyte)
on Apr 24, 2013 at 19:54 UTC ( #1030502=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use Net::Telnet::Cisco;
    use strict;
    ...
        $session->cmd ("sh running-config | redirect ftp://192.168.1.10/pr
    +oba$pe.txt");
        $session->close;
      }
    
  2. or download this
    C:\Users\mydesktop\Desktop\Perl>perl telnet2.pl
    Global symbol "$session" requires explicit package name at telnet2.pl 
    +line 24.
    Global symbol "$session" requires explicit package name at telnet2.pl 
    +line 25.
    Execution of telnet2.pl aborted due to compilation errors.
    
  3. or download this
    C:\Users\mydesktop\Desktop\Perl>perl telnet2.pl
    "my" variable $session masks earlier declaration in same scope at teln
    +et2.pl line 25.
    Useless use of private variable in void context at telnet2.pl line 26.
    Use of uninitialized value within %users in string eq at telnet2.pl li
    +ne 19.
    Can't call method "login" on an undefined value at telnet2.pl line 22.
    C:\Users\mydesktop\Desktop\Perl>
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1030502]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (14)
As of 2014-09-23 17:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (234 votes), past polls