Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re: scp perl

by halley (Prior)
on Feb 05, 2008 at 16:48 UTC ( #666345=note: print w/replies, xml ) Need Help??

in reply to scp perl

This seems to have nothing to do with perl... but I'll bite.
system('scp login:password@host:path/to/file.txt file_backup.txt'); if (-f 'file_backup.txt') { system('ssh login:password@host rm path/to/file.txt'); }
More safeguards are necessary here, and I shudder to see a password in plaintext. Learn to use ssh's authorized_keys file at the minimum. Reading all of ssh's manpage until enlightenment comes is better.

[ e d @ h a l l e y . c c ]

Replies are listed 'Best First'.
Re^2: scp perl
by pc88mxer (Vicar) on Feb 06, 2008 at 00:41 UTC
    One perl related safe-guard I'd recommend is to use the multi-argument form of system:

    system('scp', "login:password@host:path/to/file.txt", "file_backup.txt");

    Also, I'd second the use of authorized_keys. Not only is it more convenient, but it centralizes the management of your security which very helpful.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://666345]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (4)
As of 2020-09-20 11:30 GMT
Find Nodes?
    Voting Booth?
    If at first I donít succeed, I Ö

    Results (121 votes). Check out past polls.