in reply to scp recommendations

I believe if you want to stay with core you will have to go with the system("scp $from $to") route. Otherwise Net::SFTP or Net::SCP is your best bet.

Replies are listed 'Best First'.
Re^2: scp recommendations
by ikegami (Patriarch) on Jul 30, 2010 at 22:13 UTC 
    system("scp", "--", $from, $to)

    [download]
    unless you want to spend time converting $from and $to into shell literals.
[reply]
[d/l]
      That's not enough either as scp in order to run another scp as its slave in the remote side, calls ssh as... 
      system('ssh', 'scp', '-t', @args)

      [download]
      But the SSH protocol accepts only a single command string, ssh joins everything in one line and the command arrives at the remote machine as... 
      system("scp -t @args")

      [download]
      And it is called through the shell. That's why @args has to be escaped in order to avoid the remote shell doing unexpected things.
[reply]
[d/l]
[select]
        # No good on Windows
sub text_to_shell_lit {
   my ($s) = @_;
   $s =~ s/'/'\\''/g;
   return "'$s'";
}

        [download]
        my $cmd =
   join ' ',
   map text_to_shell_lit($_),
   scp => '-t', @args;

system(ssh => $cmd);

        [download]
[reply]
[d/l]
[select]
Re^2: scp recommendations
by syphilis (Archbishop) on Jul 31, 2010 at 00:38 UTC
    Otherwise Net::SFTP or Net::SCP is your best bet

    There's also Net::SSH2, which works well, is actively maintained, and has no requirements other than the libssh2 C library.

    Cheers,
    Rob
[reply]
Re^2: scp recommendations
by salva (Canon) on Aug 01, 2010 at 19:28 UTC
[reply]

In Section Seekers of Perl Wisdom