hakkr has asked for the wisdom of the Perl Monks concerning the following question:

I have found the Net::SSH module. How do I use it to secure copy files from from my server. Is it just a matter of logging in and issuing some remote cp command. If this is not possible can I use this module with Net::Ftp to achieve secure ftp tunneling. Is there maybe a Net::SFTP ? thanks

Replies are listed 'Best First'.
Re: Perl and SSH and ftp/scp
by Kanji (Parson) on Jun 26, 2002 at 09:43 UTC
[reply]
Re: Perl and SSH and ftp/scp
by ariels (Curate) on Jun 26, 2002 at 09:40 UTC
    CPAN also has a module Net::SFTP, which might be more suited to your needs. (I've not used it, so I cannot comment further.)
[reply]
Re: Perl and SSH and ftp/scp
by grantm (Parson) on Jun 26, 2002 at 11:20 UTC

    I haven't had much luck with the SSH modules on platforms other than Linux, but this sort of thing is fairly portable:

        system("scp file host:file")

    (I use pscp from the putty package on Windows).

[reply]
[d/l]
Re: Perl and SSH and ftp/scp
by Aristotle (Chancellor) on Jun 26, 2002 at 17:13 UTC

    Untested dirty hack ahead.

    use warnings;
use strict;
use Net::SSH qw(sshopen2);

my $user = "username";
my $host = "hostname";
my $localfile = "~/example.local";
my $remotefile = "~/example.remote";

sshopen2("$user\@$host", *READER, *WRITER, "cat > $remotefile") || die
+ "ssh: $!";

open INFILE, "<", $localfile;
print WRITER $_ while sysread INFILE, $_, 8192;

close(INFILE);
close(READER);
close(WRITER);

    [download]
    Use scp or Net::SFTP instead.

    Makeshifts last the longest.

[reply]
[d/l]

Back to Seekers of Perl Wisdom