Select Code to Download

use Net::Telnet::Cisco;
use strict;
...
    $session->cmd ("sh running-config | redirect ftp://192.168.1.10/pr
+oba$pe.txt");
    $session->close;
  }

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.

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>