Bonjour le forum,
Je suis confronté à un problème de variables, en fait je crois zavoir diagnostiquer avec l'aide de l'outil de recherche l'origine du problême mais je ne sais pas y remédier.
Je m'explique :
J'ai une variable globale qui doit me servir à faire des tests dans une boucle "foreach", or je crois qu'elle devient variable locale dans cette dite boucle.
Mon Code :
Donc cette variable $nomfile est sensée me permettre de faire des tests et je souhaite y accéder d'une occurence à l'autre.
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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31 open(RES,'resultat.txt'); #j'initialise la variable nomfile $nomfile = "vide"; @lignes = <RES>; foreach $ligne(@lignes){ #ici je souhaite pouvoir faire une série de test en récupérant $nomfile telle qu'elle a été modifiée précédemment. if ($nomfile ="vide" && $ligne=~ /.*\.html/ig){ $nomfile = $ligne; $nomfile =~ s/ \.//gi; } if($ligne=~ /\*+\ \./){ $nomfile = "vide"; } if ($ligne=~ /^0+\d+/){ print $nomfile,"\n"; print $ligne,"\n"; } }
Si vous avez des idées je serai très reconnaissant.
Merci
Partager