Discussion :

[nikko49]

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

[Gardyen]

ce code est correct, j'affiche bien les 3 lignes quand je le teste...

[Lolo78]

ce code est correct, j'affiche bien les 3 lignes quand je le teste...

Pour moi, il est correct également.

Peut-être un problème de format du fichier en entrée, en particulier des retours à la ligne. J'ai eu un problème analogue avec un fichier n'était pas compatible avec l'OS sur lequel j'exécutais le traitement (incompatibilité entre Unix et Windows). Sauf qu'au lieu du problème classique des ^M sous Unix, on se retrouvait avec les retours en début de ligne sans les sauts de lignes. Du coup, toutes les lignes s'affichaient successivement et très rapidement sur la même ligne de l'écran et, au final, on ne voyait que la dernière ligne du fichier s'afficher.

Précise sur quel OS tu exécutes ton programmer et d'où vient ton fichier. Ou met le fichier en pièce jointe.

[nikko49]

J'exécute mon script sous Windows.
Voici mon fichier texte en pièce jointe, ainsi que le script Perl.

Et en effet, lors de l'exécution de mon script dans une fenêtre dos, seul la dernière ligne s'affiche.

Merci de m'éclairer, parce que là je ne vois vraiment pas pourquoi cela ne fonctionne pas

[nikko49]

En fait, et cela rejoint un peu ce que disait Lolo78, mon fichier texte était en "format Macintosh".
Du coup j'ai recrée un fichier texte format UNIX, et tout marche très bien

[Lolo78]

Dans ce cas, c'est exactement ce dont je parlais. Le format Mac utilise le retour chariot sans saut de ligne comme séparateur de ligne. Du coup, sous Unix, chaque ligne s'écrit sur la précédente et tu ne vois au final que la dernière.