Re: [PERL] Net::SFTP functions Hi,

You need to use:

$ftp->get("/path/to/remote/file", "/path/to/local/destination_file");

Octavian

----- Original Message ----- 
From: 
To: 
Sent: Wednesday, June 27, 2007 11:59 AM
Subject: [PERL] Net::SFTP functions


Hi all,

I am using Net::SFTP package to remotely connect to a local SFTP
server (on a LAN) and retreive files from it toward another LAN shared
folder.

I am successfully connecting to the SFTP server (of that I am shure as
the $sftp->ls() function displays me the folders of the home
directory) however I have some problems to move through the folders
and retreive files.

I am trying to retreive a file stored in a subfolder of the home
directory but:
1) I did not find a way to move to that folder. There is no "cd"
command with SFTP package ?? I did not find anything in the cpan doc.

2) The file is never retreived when using the $sftp->get() function. I
systematically get the error message "No such file or directory". I
tried virtual pathes, absolute pathes but nothing works :(

Here is my script:

    #ParamÃ¨tres de connexion
    my $host = xx.xx.xxx.xxx';
    my %args = (user => "toto",
                password  =>  "pass",
                ssh_args  =>  [port=>22]);

    #CrÃ©ation de l'en tÃªte de la requÃªte
    my $sftp = Net::SFTP->new($host, %args) or die "Cannot connect to
$@";
    print "Connected.\\n";

    #RÃ©cupÃ©ration de la date du jour
    my $dateJour =  formatDate();

    $sftp->ls('.' , sub { print $_[0]->{filename}, "\\n" });

    #On se positionne dans le rÃ©pertoire
    $sftp->get("rep/Export.csv", "\\\\\\\\share\\\\Exports Annuaires\\\\Export
$dateJour.csv")
        or die "Impossible de copier le fichier. Error : $!\\n";

In the script, I display the folders of the home directory, which is
working (as explained earlier). But if I try  to display the files
stored in the subfolder, I get the same folder listing: I don't
understand.

This folder is called rep, and that is the folder from where I am
trying to retreive a file when I call the get function. My shared
folder is available as the destination file is correctly created
(Export 2007 06 27.csv for example) but allways empty.

And I am working on windows ;)

Am I doing something wrong ? Could someone help me ?

Thanks !


-- 
To unsubscribe, e-mail: beginners-unsubscribe@perl.org
For additional commands, e-mail: beginners-help@perl.org
http://learn.perl.org/



-- 
To unsubscribe, e-mail: beginners-unsubscribe@perl.org
For additional commands, e-mail: beginners-help@perl.org
http://learn.perl.org/


