[FTP] message d' erreur disparait

Bonjour,

certains messages d' erreur ne restent pas affichés et disparaissent instantanément.
ci-dessous un bout de code qui fait apparaitre ce cas.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

#!/usr/bin/perl use Net::FTP;   #-- connect to ftp server apaul.ifrance.com est ok #-- connect to ftp server apaul.ifrancex.com le message disparait   $ftp = Net::FTP->new("apaul.ifrancex.com") or die "Cannot connect to apaul.ifrance.com";   $saisie = <STDIN>; print("$saisie");

---

bien sur dans ce cas l' erreur est intentionnelle mais que faire pour qu' au moins die soit efficace.

Merci (je suis en perl 5.8.3.809 sous windows vista)

bon, pour t'aider un peu.
A chaque fois que tu écris un script Perl, pense à mettre un use warnings et strict pour gérer tes erreurs.
Déclare tes variables en mettant un my.
tu n'as pas besoin de parenthèse pour ton print.

Exemple pour ton script :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

#!/usr/bin/perl use warnings; use strict; use Net::FTP;   #-- connect to ftp server apaul.ifrance.com est ok #-- connect to ftp server apaul.ifrancex.com le message disparait   my $ftp = Net::FTP->new("apaul.ifrancex.com") or die "Cannot connect to apaul.ifrance.com";   my $saisie = <STDIN>; print "Ma saisie : $saisie\n";

---