Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use Net::OpenSSH;
    ...
    $ssh->error and print "Unable to connect: " . $ssh->error;
    print "Connected to $ssh\n";
    undef $ssh;
    
  2. or download this
    open secure shell
    # open_ex: ['ssh','-V']
    # io3 mloop, cin: 0, cout: 1, cerr: 0
    # io3 fast, cin: 0, cout: 1, cerr: 0