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 : Sélectionner tout - Visualiser dans une fenêtre à part
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)