[Ssh-sftp-perl-users] net::sftp (disconnect/channel open failure)

[<eri...@wa...>]

Hi!

I searched the Archives of this list and found a couple of similar items 
but no resolution so I thought I might post it myself.  I'm getting the 
below output when trying to connect to an OpenSSH box listening on port 
10022 using net::sftp.  What is happening when its trying to open channel 
1?

Any ideas??

Output
##########################

Starting
linux.local: Reading configuration data 
/home/#######/.ssh/config
linux.local: Reading configuration data /etc/ssh_config
linux.local: Connecting to xxxxxx.xxxxxxxx.com, port 10022.
linux.local: Remote protocol version 2.0, remote software version 
OpenSSH_3.7p1
linux.local: Net::SSH::Perl Version 1.27, protocol version 2.0.
linux.local: No compat match: OpenSSH_3.7p1.
linux.local: Connection established.
linux.local: Sent key-exchange init (KEXINIT), wait response.
linux.local: Algorithms, c->s: 3des-cbc hmac-sha1 none
linux.local: Algorithms, s->c: 3des-cbc hmac-sha1 none
linux.local: Entering Diffie-Hellman Group 1 key exchange.
linux.local: Sent DH public key, waiting for reply.
linux.local: Received host key, type 'ssh-dss'.
linux.local: Host 'xxxxxx.xxxxxxxx.com' is known and matches the host key.
linux.local: Computing shared secret key.
linux.local: Verifying server signature.
linux.local: Waiting for NEWKEYS message.
linux.local: Enabling incoming encryption/MAC/compression.
linux.local: Send NEWKEYS, enable outgoing encryption/MAC/compression.
linux.local: Sending request for user-authentication service.
linux.local: Service accepted: ssh-userauth.
linux.local: Trying empty user-authentication request.
linux.local: Authentication methods that can continue: 
publickey,password,keyboard-interactive.
linux.local: Next method to try is publickey.
linux.local: Trying pubkey authentication with key file 
'/home/#######/.ssh/id_dsa'
linux.local: Authentication methods that can continue: 
publickey,password,keyboard-interactive.
linux.local: Next method to try is publickey.
linux.local: Next method to try is password.
linux.local: Trying password authentication.
linux.local: Login completed, opening dummy shell channel.
linux.local: channel 0: new [client-session]
linux.local: Requesting channel_open for channel 0.
linux.local: channel 0: open confirm rwindow 0 rmax 32768
linux.local: Got channel open confirmation, requesting shell.
linux.local: Requesting service shell on channel 0.
linux.local: channel 1: new [client-session]
linux.local: Requesting channel_open for channel 1.
Received disconnect message: Unsupported request (shell).
  at /usr/lib/perl5/site_perl/5.8.5/Net/SSH/Perl/SSH2.pm line 281


Code
##########################

!/usr/bin/perl

use Net::SFTP;

print "Starting\n";

my %args = 
(user=>"########",password=>"########",debug=>"1",ssh_args=>[port=>10022]);

my $sftp = Net::SFTP->new("xxxxxx.xxxxxxxx.com", %args);

print $sftp->ls();