NAME

Net::OpenSSH::Compat::SSH2 - Net::OpenSSH adapter for Net::SSH2 API compatibility

SYNOPSIS

  use Net::OpenSSH::Compat::SSH2 qw(:supplant);
  use Net::SSH2;
  my $ssh2 = Net::SSH2->new;
  $ssh2->connect('host');
  $ssh2->auth_publickey("jsmith",
                        "/home/jsmith/.ssh/id_dsa.pub",
                        "/home/jsmith/.ssh/id_dsa");
  my $c = $ssh2->channel;
  $c->exec("ls");
  print while <$c>;
  $c->close;
  print "exit status: ", $c->exit_status, "\n";

DESCRIPTION

This module implements Net::SSH2 API on top of Net::OpenSSH.

After the module is loaded as...

  use Net::OpenSSH::Compat::SSH2 qw(:supplant);

it will supplant the Net::SSH2 module as if it was installed on the machine and use Net::OpenSSH under the hood to handle SSH operations.

Most programs using Net::SSH2 should continue to work without any change.

Setting defaults

The hash %Net::OpenSSH::Compat::SSH2::DEFAULTS can be used to set default values for Net::OpenSSH and other modules called under the hood and otherwise not accessible through the Net::SSH2 API.

The entries currently supported are:

connection => [ %opts ]

Extra options passed to "Net::OpenSSH::new" constructor.

Example:

  $Net::OpenSSH::Compat::SSH2::DEFAULTS{connection} =
    [ ssh_path => "/opt/SSH/bin/ssh" ];

channel => [ %opts ]

Extra options passed to "Net::OpenSSH::open_ex" method.

sftp => [ %opts ]

Extra options passed to "Net::SFTP::Foreign::new" constructor.

  $Net::OpenSSH::Compat::SSH2::DEFAULTS{connection} =
    [ read_ahead => 128 * 1024, queue_size => 20 ];

BUGS AND SUPPORT

This is a work in progress.

Besides that, there are some functionality of Net::SSH2 that can not be emulated with Net::OpenSSH. Fortunately, the missing bits are rarely used so probably you may not need them at all.

Specifically, the return values from the "$ssh2->method($ATTR)" are not real but faked ones. "auth_list" return value is also faked.

Anyway, if your Net::SSH2 script fails, fill a bug report at the CPAN RT bugtracker (<https://rt.cpan.org/Ticket/Create.html?Queue=Net-OpenSSH-Compat>) or just send me an e-mail with the details.

Include at least:

1 - The full source of the script
2 - A description of what happens in your machine
3 - What you thing it should be happening
4 - What happens when you use the real Net::SSH2
5 - The version and name of your operating system
6 - The version of the OpenSSH ssh client installed on your machine ("ssh -V")
7 - The Perl version ("perl -V")
8 - The versions of the Perl packages Net::OpenSSH, IO::Pty and this Net::OpenSSH::Compat.

Git repository

The source code repository is at <https://github.com/salva/p5-Net-OpenSSH-Compat>.

My wishlist

If you like this module and you're feeling generous, take a look at my Amazon Wish List: <http://amzn.com/w/1WU1P6IR5QZ42>

Also consider contributing to the OpenSSH project this module builds upon: <http://www.openssh.org/donations.html>.

COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.0 or, at your option, any later version of Perl 5 you may have available.