Tim Wolak [TW], on Thursday, March 03, 2005 at 10:19 (-0600)
contributed this to our collective wisdom:

TW> script and give a me few pointers?  I know I may be missing a few things
TW> but I have not worked a lot with modules yet so forgive the mistakes.

for me looks OK, just:

TW> Thanks for your help!

use strict;
use warnings;

TW> use Net::SFTP;

TW> $user = "user1";
TW> $pass = "pass1";

I'd use ' instead "

TW> my $host = "0.0.0.0";
TW> my $sftp = Net::SFTP::->new($host);
$sftp->login("$user","$pass");
$sftp->put("test.txt");

you dont need ":
$sftp->login($user,$pass);
$sftp->put(test.txt);

Also it could be good checking if operation was successful, so:
$sftp->login("$user","$pass") || die "Can't connect...\n";

and so on...

-- 

 ...m8s, cu l8r, Brano.

[This is an ECHO-why do I see messages only once??]



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to