Select Code to Download

<?xml version="1.0" encoding="ISO-8859-1"?>
<hello xmlns="urn:ietf:params:xml:ns:netconf:base:1.0">
...
  <session-id>25470</session-id>
</hello>
]]>]]>

my $ssh = Net::OpenSSH->new($host, user=>$user, password=>$pass);
$ssh->error and die "unable to connect to remote host: " . $ssh->error
+;
...
($socket, $pid) = $ssh->open2socket;
while (<$socket>) { print };
waitpid($pid, 0);

# call args: ['ssh','-o','ServerAliveInterval=30','-x2MN','-o','Number
+OfPasswordPrompts=1','-o','PreferredAuthentications=keyboard-interact
+ive,password','-S','/home/user/.libnet-openssh-perl/user-host-31054-2
+7407','-l','user','host','--']

# call args: ['ssh','-s','-S','/home/user/.libnet-openssh-perl/user-ho
+st-31054-27407','-l','user','host','--','xmlagent']
# open_ex: ['ssh','-s','-S','/home/user/.libnet-openssh-perl/user-host
+-31054-27407','-l','user','host','--','xmlagent']
...
# open_ex: ['ssh','-S','/home/user/.libnet-openssh-perl/user-host-3105
+4-27407','-l','user','host','--']
Pseudo-terminal will not be allocated because stdin is not a terminal.
stty: standard input: Invalid argument