Tu fais ça dans le mauvais sens j'ai l'impression.
Avec
my $FileResult = 'C:\Users\Documents\probe\DATA2.csv';
open( my $FhResult, '>', $FileResult );
Tu vas écraser ton fichier DATA2.csv, alors que j'ai plutôt l'impression que c'est le fichier qui te donne les résultats à mettre en forme.
Pour lire DATA.csv :
my $FileInput = 'C:\Users\Documents\probe\DATA2.csv';
open( my $FhInput, '<', $FileInput );
Et ensuite, pour écrire dans C:\Users\Documents\probe\result.html :
my $FileOutput = 'C:\Users\Documents\probe\result.html';
open( my $per_line_fh, '>', $FileOutput );
C'était bien le sens de ta question ?
Ah, et sinon, pense à mettre des die quand tu ouvres un fichier, juste au cas où :
open( my $per_line_fh, '>', $FileOutput ) or die "Y a un problème pour ouvrir $FileOutput : $!";
Tu auras alors un message vite compréhensible (Y a un problème pour ouvrir C:\Users\Documents\probe\result.html) avec la raison pour laquelle perl n'a pas réussi à l'ouvrir (c'est le $! qui donne ça).
Being a sysadmin is easy. As easy as riding a bicycle. Except the bicycle is on fire, you’re on fire and you’re in Hell.
[^] # Re: tes chaines et tes variables
Posté par Framasky (site web personnel) . En réponse au message Concatenation. Évalué à 2.
Tu fais ça dans le mauvais sens j'ai l'impression.
Avec
Tu vas écraser ton fichier DATA2.csv, alors que j'ai plutôt l'impression que c'est le fichier qui te donne les résultats à mettre en forme.
Pour lire DATA.csv :
Et ensuite, pour écrire dans
C:\Users\Documents\probe\result.html:C'était bien le sens de ta question ?
Ah, et sinon, pense à mettre des
diequand tu ouvres un fichier, juste au cas où :Tu auras alors un message vite compréhensible (
Y a un problème pour ouvrir C:\Users\Documents\probe\result.html) avec la raison pour laquelle perl n'a pas réussi à l'ouvrir (c'est le$!qui donne ça).Being a sysadmin is easy. As easy as riding a bicycle. Except the bicycle is on fire, you’re on fire and you’re in Hell.