Help for this page

Select Code to Download


  1. or download this
    #!perl -w
    use strict;
    ...
        }
        #$channel_id->close();
    }
    
  2. or download this
    #!/usr/bin/perl -w
    use strict;
    ...
        close($fileHandler);
        return 0;
    }
    
  3. or download this
    TCP Connection established with Channel id: 'IO::Socket::INET=GLOB(0x3
    +494d8c)'
    In send_command  sub-routine:-Channel_id: 'IO::Socket::INET=GLOB(0x349
    +4d8c)' and command: 'dir'