Discussion :

[Jeremy0201]

Salut, j'essaye d'afficher le contenu d'un dossier mais ca ne fonctionne pas

voici le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
print "Tentative de connexion sur le serveur ${serveur_ftp_utilisateur}";
my $ftp=Net::FTP->new($serveur_ftp_utilisateur)
or die "Impossible de se connecter au serveur .. Verifier vos informations,pare-feu .\n";
$ftp->login($login_ftp_utilisateur,$motdepasse_ftp_utilisateur)
or die "Identifiant ou mot de passe incorrecte ";
$ftp->cwd("/")
or die "Ce répertoire n'existe pas .";
$ftp->list()
or die "marche pas";

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
#Execution du script
>> Tentative de connexion sur le serveur ..
[jeremy@ArchLinux Perl]$

ca m'affiche rien , pas d'erreur et le script se fini.. quelqu'un a la solution svp

[Invité]

Salut,

tu peux activer le debug pour voir les échanges entre ton client et ton serveur ftp:

my $ftp=Net::FTP->new("server",Debug => 1)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
print $ftp->list()."\n"

Pour afficher l'output de ton list.

Si tu veux afficher les répertoires et fichiers, utilise la fonction ls ou dir + print pour afficher le résultat.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
@filelist = $ftp->dir() or die "marche pas";
 
foreach $file(@filelist){
print $file."\n";
}
 
$ftp->quit();

[cassis2k]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
#Execution du script
>> Tentative de connexion sur le serveur ..
[jeremy@ArchLinux Perl]$

Pour moi, je vois que tu affiches des messages d'erreurs mais rien quand tout se déroule bien. Ton code se déroule bien ^^

[Jeremy0201]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
@filelist = $ftp->dir() or die "marche pas";
 
foreach $file(@filelist){
print $file."\n";
}
 
$ftp->quit();

[/QUOTE]

Merci ca marche , d'ailleurs c'est bizarre car je n'ai pas déclaré de variable $file ..

[Invité]

Salut,

la variable $file est déclarée et initialisée directement au niveau du foreach avec les valeurs du tableau à chaque itération.