Bonjour,
J'ouvre un fichier et pour chaque ligne de ce fichier, je remplace une donne figé par la valeur d'un autre. Ma question est : je veux traiter toute les lignes sauf la premiere.
Le script ci-dessous traite toutes les lignes et ça fonctionne assez bien.
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
17
18
19
20 #=================================================================================== # traitement des lignes xml #----------------------------------- open(FicEntree,"$NomFicCsv") || die "Impossible de d'ouvrir $NomFicCsv"; while (<FicEntree>) { @TableauCsv = split (/;/ ,$_ ); #printf "====> @TableauCsv\n"; chomp ($TableauCsv[$#TableauCsv]); @TableauLigneXml2=@TableauLigneXml; foreach $LigneXml (@TableauLigneXml2) { $LigneXml=~ s;xxTOTOxx;$TableauCsv[0];g; $LigneXml=~ s;xxTATAxx;$TableauCsv[4];g; print $LigneXml ; } } close(FicEntree);
Partager