Bonjour,

je lis un fichier contenant sur chaque ligne des data + une heure relative. Je dois garder ces data, mais je dois passer l'heure en absolu (donc cumuler chaque ligne avec la ligne n-1). J'arrive à récupérer mes data, mais je n'arrive pas trop a ajouter les valeurs heure entre elles :

EX :
A 1 0.200
B 2 0.300
C 3 0.500

je dois obtenir
A 1 0.200
B 2 0.500
C 3 1.000


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
my $fic_ouvert;
my $ligne_alire ;
my $data1;
my $data2;
my $heure;
 
open(FICHIER,"$fic_ouvert") or die "Erreur ";
 
 while ($ligne_alire  = <FICHIER>)
{
          $data1 = (split m/\s+/, $ligne_alire)[0];
          $data2 = (split m/\s+/, $ligne_alire)[1];
          $heure = (split m/\s+/, $ligne_alire)[2]);
 
 print "$data1 $data2 $heure\n"; 
}
J'obtiens donc les lignes de mon fichier. Comment ajouter les valeurs heures entre elles?

merci.