Perl et le FTP

Marsh Posté le 10-05-2004 à 00:10:42

Hello,

je galère un peu pour faire fonctionner correctement un upload ftp dans un script Perl. Voici ce que j'ai essayé :

use Net::FTP;

$ftp = Net::FTP->new($hostname);
$ftp->login($login, $passwd);
$ftp->cwd($home);
$ftp->put($fichier);
$ftp->bye;
Et mon script semble s'arrêter à la première ligne. Quelqu'un peut-il me confirmer la bonne syntaxe ? Toutes les variables sont déclarées avant. Merci !

Marsh Posté le 10-05-2004 à 00:10:42

Marsh Posté le 10-05-2004 à 01:07:33

sous windows ou unix?

---------------
http://www.boincstats.com/signature/user_664861.gif

Marsh Posté le 10-05-2004 à 01:10:35

Code :

use strict;
use Net::FTP;
my $ftp = Net::FTP->new($hostname, Debug => 0)
or die "Cannot connect $hostname: $@";
$ftp->login($login, $passwd)
or die "Cannot login ", $ftp->message;
$ftp->cwd($home)
or die "Cannot change working directory ", $ftp->message;
$ftp->put($file)
or die "put failed ", $ftp->message;
$ftp->quit;

---------------
http://www.boincstats.com/signature/user_664861.gif

Marsh Posté le 10-05-2004 à 09:03:00

Bon, je suis obligé d'enlever le "use strict;", sinon c'est l'erreur interne Apache.

Mais le script s'execute correctement, mais pas de fichier à l'arrivée. Je présume qu'il s'agisse d'un serveur unix, je travaille sur un hébergeur distant.

Marsh Posté le 10-05-2004 à 11:29:14

tu devrais pas avoir d'erreur avec use strict si tu as fais un copy paste de mon code. Sinon, es-tu certain que le user que tu utilise pour faire le put a accès en écriture?

---------------
http://www.boincstats.com/signature/user_664861.gif

Marsh Posté le 10-05-2004 à 12:48:42

C'est ce que j'ai fait, et le use strict engendre une erreur interne apache. Le user est bon, je m'en sers pour uploader mes scripts sur le serveur.

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *