Bonjours
J'ai un petit probleme.
Voila mon code, enfin voila un code simplifier:
Donc le programme va jusqu'a ce quil trouve 17 H 00 dans le fichier.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 open (FIC,"FIC.TXT")||die("pb d'ouverture\n"); until($ligne=~/17 H 00/) { $ligne=<FIC>; if($ligne=~/toto/) { print $ligne; } }
Mais si jamais il le trouve pas, il bloque.
Comment puis-je remedier a ce probleme.
En gros est ce qu'il existe un test qui detecte la fin du fichier pour pouvoir arreter le programme?
Merci
Partager