Help for this page

Select Code to Download


  1. or download this
    : Sent key-exchange init (KEXINIT), wait response.
    : Algorithms, c->s: 3des-cbc hmac-sha1 none
    : Algorithms, s->c: 3des-cbc hmac-sha1 none
    
  2. or download this
        my $ssh = Net::SSH::Perl->new($GO, debug=>1, protocol=>2);
        $ssh->login($username, $passwd);
    ($stdout, $stderr, $exit) = $ssh->cmd("show configuration interfaces a
    +t-0/0/1.1");