Discussion :

[oliviernouhi]

Bonjour,

Je voudrais commencer la lecture de mon fichier a partir d'un moment précis.

Pour le moment je fais :

Code :

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

1
2
while ( my $ligne = <FICHIER>) {
}

Je voudrais donc lire mon fichier tant qu'il y a des lignes, et commencer la lecture de mon fichier quand ma ligne est égale à :

Code :

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

( $ligne =~ m/^\t{2}Application Actions\s*(.+)/ )

Comment faire svp ?

Merci d'avance et bonne soirée

[Beniou]

Je ne vois pas trop le problème : je crois que tu as toutes les idées pour, non ?

[Philou67430]

Si j'ai bien compris, tu souhaites "traiter" (et non commencer la lecture) les lignes de ton fichier, à partir d'un certain motif trouvé (et jusqu'à la fin).

Une méthode est d'utiliser l'opérateur d'étendue (forme scalaire), ou un indicateur (flag).

Les deux solutions en image :

Code :

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

1
2
3
4
5
while ( my $ligne = <FICHIER>) {
  if ($ligne =~ m/^\t{2}Application Actions\s*(.+)/ .. defined $ligne) {
    # traiter le fichier
  }
}

Code :

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

1
2
3
4
5
6
7
8
 
my $a_traiter = 0;
while ( my $ligne = <FICHIER>) {
  $a_traiter ||= $ligne =~ m/^\t{2}Application Actions\s*(.+)/;
  if ($a_traiter) {
    # traiter le fichier
  }
}

[oliviernouhi]

Merci pour tes réponses je vais tester ça.

Cependant que signifie ce signe

Code :

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

||=

??

Merci d'avance

[oliviernouhi]

J'ai testé tes deux propositions, ça ne marche pas.
Mon code parcourt 0 ligne du fichier.
C'est normal ???

Voici le début du fichier en entrée :

Code :

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

1
2
3
4
5
6
7
	Frame:
	Custom Control: cQuickGraph
		Application Actions
			On SAM_AppStartup
	Set nGPourcent = NUMBER_Null
Call GHtmlHelp.cmInitializeHelp(  )

La lecture du fichier doit commencer à partir de \t{2}Application Actions

Merci d'avance pour l'aide

[Philou67430]

Montre la totalité de ton code.
Sinon, j'ai corrigé une erreur dans mon premier exemple.

L'opérateur ||= s'utilise comme +=, en remplaçant + par ||.
Par exemple

Code :

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

$a ||= 1;

est équivalent à

Code :

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

$a = $a || 1;