Bonsoir.

J'utilise Perl sous Windows XP.

Le script Perl qui suit provoque l'avertissement indiqué si l'ouverture du fichier (en lecture) ne réussit pas et seulement dans ce cas.
Quelqu'un peut-il me dire pourquoi ?

A part cela, tout me semble normal, mais je souhaite poser la question, parce qu'on m'a conseillé de corriger tout ce qui provoque des avertissements.
Par parenthèse, quelqu'un pourrait-il me dire comment on pourrait éviter cet avertissement ?


#!/usr/local/bin/perl -w # Sous Unix, sert à recevoir des avertissements.
# Je ne sais pas si cela sert sous Windows.

use strict;


# Le programme qui suit affiche l'avertissement "Use of uninitialized value in numeric eq (==) at OpenAvecValeurNonInitialisee.pl line 9.", mais uniquement si l'ouverture du fichier ne réussit pas. Dans les deux cas (que l'ouverture réussisse ou non), le résultat du programme est conforme aux attentes. Pourquoi cet avertissement, et pourquoi seulement dans un cas ?

if (open(FICHIERIN, "C:\\FichierFantome") == 0)
{
print "Fichier inexistant.";
}
else
{
close(FICHIERIN);
print "Le fichier existe."
}


Merci d'avance.