Bonjour,

Depuis hier j'ai repris un script que j'avais laissé il y a quelques mois dont le but, en résumé, est de parser des numéros de téléphones (1 par ligne), et de réaliser ensuite des traitements en fonction.

Or, impossible de faire fonctionner le parsing de mon fichier texte ligne par ligne.
Voici pourtant le code que j'utilise et qui me semble correct :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
open my($file), '<', 'liste.txt';
while( my $line = <$file> ) 
{
    chomp($line) ;
    print "$line \n";
}
Mon fichier 'liste.txt' étant tout simple :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
0130110925
0231392398
0475844776
Enfin, quand j'éxécute mon script 'test.pl', seul le dernier numéro de téléphone s'inscrit.

Merci de m'éclairer sur ce sujet sûrement tout simple