urn:ietf:params:xml:ns:netconf:base:1.0 urn:ietf:params:netconf:base:1.0 25470 ]]>]]> #### my $ssh = Net::OpenSSH->new($host, user=>$user, password=>$pass); $ssh->error and die "unable to connect to remote host: " . $ssh->error; my ($socket, $pid) = $ssh->open2socket({ssh_opts => '-s'}, 'xmlagent'); ($socket, $pid) = $ssh->open2socket; while (<$socket>) { print }; waitpid($pid, 0); #### # call args: ['ssh','-o','ServerAliveInterval=30','-x2MN','-o','NumberOfPasswordPrompts=1','-o','PreferredAuthentications=keyboard-interactive,password','-S','/home/user/.libnet-openssh-perl/user-host-31054-27407','-l','user','host','--'] #### # call args: ['ssh','-s','-S','/home/user/.libnet-openssh-perl/user-host-31054-27407','-l','user','host','--','xmlagent'] # open_ex: ['ssh','-s','-S','/home/user/.libnet-openssh-perl/user-host-31054-27407','-l','user','host','--','xmlagent'] # call args: ['ssh','-S','/home/user/.libnet-openssh-perl/user-host-31054-27407','-l','user','host','--'] # open_ex: ['ssh','-S','/home/user/.libnet-openssh-perl/user-host-31054-27407','-l','user','host','--'] Pseudo-terminal will not be allocated because stdin is not a terminal. stty: standard input: Invalid argument