no save
Assistance
Achat
News

Forum | programmation
[Perl] "Unitialized value" avec Open (HA
lami20j, le sam. 11 févr. 2006 à 19:29:16
Tu veux afficher ton code s'il te plaît.

if (open(FICHIERIN, "C:\\FichierFantome") == 0)
La fonction open renvoie vrai si elle réussit et undef sinon.

Donc dans ton cas tu peux écrire unless (open FICHIERIN, "C:\FichierFantome") {
print "Fichier inexistant.";
}
else
{
close FICHIERIN;
print "Le fichier existe."
}

En revanche c'est mieux d'écrire quelque chose comme ça open FIC, "C:\le_fichier.txt"
or die "Impossible d'ouvrir le fichier : $!\n";
# fermeture de prog si le fichier n'est pas accessible.
# traitement de fichier
while ( <FIC> ) { print }
close FIC;

En ce qui concerne l'option -w elle fonctionne aussi sous les OS non Linux
PrécédentPanurge
févr. 06
lami20j
févr. 06
Suivant
REPONSES
lami20j
févr. 06
lami20j
févr. 06
Panurge
févr. 06
lami20j
févr. 06
lami20j
févr. 06
Panurge
févr. 06
lami20j
févr. 06
Panurge
févr. 06
lami20j
févr. 06
Version Web
Réalisé par RedShift
no save