Discussion :

[Kinethe]

j' ai deux boucle "if" qui se succèdent et qui parcourent le même fichier.
pour que la deuxième boucle "fonctionne" , il faut que je ferme le fichier à la fin de la 1ère boucle et puis que j'ouvre à nouveau mon fichier avant le début de la 2ème boucle puis que je le referme.

n'existe-t-il pas un moyen qui permet, une fois arrivée à la fin d'un fichier de le reparcourir sans avoir à le refermer et à le réouvrir?

Kinethe

[remixxl]

avec ca ca marche pas ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
open (FILE,"<$text")||die "pas de fichier text";
if (...)
{
      foreach $line (<FILE>)
      {
      }
}
 
if (...)
{
      foreach $ ligne (<FILE>)
      {
      }
}

[fsapet]

salut

essaye ca

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

seek(INPUT, 0, 0) or die "UNABLE TO RETURN A THE TOP OF THE FILE:$!\n";

mais tu ne peux pas eviter de faire ca ?? c'est a dire reparcourir deux fois ton fichier,mais essayer de faire de que tu fais en deux boucles dans une seule

[remixxl]

je savais meme pas que ca existe , je vais pouvoir vachement optimiser mon code avec ton truc , cool

je trouve que le perl cest bien foutu quand meme,merci

[Choupi]

Ici aussi le tag résolu serait sympa...