Discussion :

[laurent33500]

Bonjour,

J'ai un petit problème avec mon script.
Quand le fichier soit présent ou pas le test de présence ne s'exécute pas.
Où est mon erreur

D'avance merci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
#
!/usr/bin/perl
 
use Net::FTP;
 
 
$file="Janvier09.zip";
 
    $ftp = Net::FTP->new("172.0.0.1", Debug => 1)
      or die "Cannot connect to 172.0.0.1: $@";
    $ftp->login("toto","titi")
      or die "Cannot login ", $ftp->message;
   $ftp->binary();
   $ftp->cwd("BaseComplete")
      or die "Cannot change working directory ", $ftp->message;
	  $ftp->get($file)
	  or die "get failed ", $ftp->message;
    $ftp->quit;
 
if (-e $file ){
print OK;
}
else {
print KO;
}

[Jasmine80]

Tu devrais utiliser les pragma strict et warnings et encadrer OK et KO de doubles quotes. Il est également conseillé de déclarer ses variables avec my.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl
 
use strict;
use warnings;
 
my $file = "Janvier09.zip";
 
if (-e $file ){
	print "OK";
}
else {
	print "KO";
}

[laurent33500]

Quand j'ajoute les doubles quotes cela fonctionne mieux, seulement si le fichier est présent dans le cas contraire je n'ai pas le KO.

Code :

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

1
2
3
4
5
6
7
8
 
Dernières lignes du résultat
 
Net::FTP=GLOB(0x1b59d6c)>>> RETR JanviÚr09.zip
Net::FTP=GLOB(0x1b59d6c)<<< 550 File not found
get failed File not found
 
c:\>

[Jasmine80]

Code :

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

or die "get failed ", $ftp->message;

get failed File not found

Avec le die, le programme s'arrête avant d'atteindre le if/else.

[laurent33500]

Merci Jasmine

[Jedai]

die() comme son nom l'indique fait "mourir" le programme, il est utilisé pour indiquer une erreur fatale qui empêche de continuer le programme de façon utile. Si tu as l'intention de gérer le cas où le get() échoue de façon constructive mais que tu veux tout de même prévenir l'utilisateur du problème, utilise la fonction warn(). Par ailleurs écrire un message d'erreur sur la sortie standard (avec un print() par exemple) est mal considéré, puisque cela empêche l'utilisateur de faire un tri correct entre la sortie de ton programme et ses messages d'erreurs, utilise donc warn() (qui écrit sur la sortie d'erreur) plutôt que print() dans ce cas.

--
Jedaï