Discussion :

[blacksnake]

Bonsoir,

Sur un fichier de 2000 lignes par exemple j'ai besoin d'extraire les 90 dernière lignes du fichier. En mettant en dur les numéros de lignes ds le programme j'ai le résultat escompté, or en utilisant des variables le programme me renvoie la totalité du fichier.

Merci de votre aide

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
while (<MAINFILE>)
      {
         print MYFILE "$. $_" if (1910 ... 2000);
 
      } 
 
.../...
 
while (<MAINFILE>)
      {
         print MYFILE "$. $_" if ($I ... $J);
 
      }

[lami20j]

Salut,

Code :

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

1
2
3
while (<MAINFILE>){
  print MYFILE "$. $_" if $. == $I .. $. == $J;
}

[blacksnake]

Merci Lami, ca marche impec'

Petite modif pour ne pas avoir les numéros de ligne dans le fichier de sortie :

Code :

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

1
2
3
4
 
while (<MAINFILE>) {
  	   print(MYFILE) if ($. == $line_start .. $. == $line); 
      }