Problème de parsing simple de fichier texte
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:
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:
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 :P;)
