NAME
Net::SSH - Perl extension for secure shell
SYNOPSIS
use Net::SSH qw(ssh issh sshopen2 sshopen3);
ssh('user@hostname', $command);
issh('user@hostname', $command);
sshopen2('user@hostname', $reader, $writer, $command);
sshopen3('user@hostname', $reader, $writer, $error, $command);
DESCRIPTION
Simple wrappers around ssh commands.
SUBROUTINES
- ssh [USER@]HOST, COMMAND [, ARGS ... ]
-
Calls ssh in batch mode.
- issh [USER@]HOST, COMMAND [, ARGS ... ]
-
Prints the ssh command to be executed, waits for the user to confirm, and (optionally) executes the command.
- sshopen2 [USER@]HOST, READER, WRITER, COMMAND [, ARGS ... ]
-
Connects the supplied filehandles to the ssh process (in batch mode).
- sshopen3 HOST, WRITER, READER, ERROR, COMMAND [, ARGS ... ]
-
Connects the supplied filehandles to the ssh process (in batch mode).
EXAMPLE
use Net::SSH qw(sshopen2);
use strict;
my $user = "username";
my $host = "hostname";
my $cmd = "command";
sshopen2("$user\@$host", *READER, *WRITER, "$cmd") || die "ssh: $!";
while (<READER>) {
chomp();
print "$_\n";
}
close(READER);
close(WRITER);
AUTHOR
Ivan Kohler <ivan-netssh_pod@420.am>
CREDITS
John Harrison <japh@in-ta.net> contributed an example for the documentation.
BUGS
Not OO.
Look at IPC::Session (also fsh)
SEE ALSO
ssh(1), IPC::Open2, IPC::Open3