Traitement fichier avec Sed, Awk ou autresRésolu/Fermé

Question

Bonjour, 

J'ai un fichier de données  qui contient des milliers de lignes comme suite :

1001|20015232851|||25 bld totl||75000|Paris||6|JOEAU|2206000|24/05/2013|25/06/2015||2001|2001|17592|C|48,860274|2,3450891001|20015246491|||41 rue court||75000|Paris||6|CAENS|289000|28/02/2014|30/07/2015||2001|2001|16141|C|48,88000|2,32417

Celui ci contient 21 champs séparés par des pipes | 

J'aurais souhaité pouvoir remplacer les virgules des champs 20 et 21 (les derniers) par des points comme suite :

1001|20015232851|||25 bld totl||75000|Paris||6|JOEAU|2206000|24/05/2013|25/06/2015||2001|2001|17592|C|48.860274|2.3450891001|20015246491|||41 rue court||75000|Paris||6|CAENS|289000|28/02/2014|30/07/2015||2001|2001|16141|C|48.88000|2.32417

J'ai besoin d' aide.

Merci

Configuration: Debian Squeeze,Iceweasel,Evolution

pcsystemd · Answer

Bon finalement j'ai trouvé avec Sed.

sed -e 's/|$[0-9][0-9]/[0-9][0-9]/[0-9][0-9][0-9][0-9]$ [0-9][0-9]:[0-9][0-9]:[0-9][0-9]/|\1/g' -e 's/,/./g' fichier1 > fichier2 

Merci

mamiemando · Answer

Ta solution ne limite pas la substitution aux colonnes 20 et 21. Avec awk :

cat toto.txt | awk 'BEGIN {FS="|"} ; {printf("%s",$1); for(i=2;i<20;i++) printf("|%s",$(i)); for(i=20;i<22;i++){ s=$(i); gsub(/,/, ".", s); printf("|%s",s);} print "";}' 

Ou de manière plus lisible si tu passes par un fichier script.awk :

BEGIN {
  FS="|"
}

{
  printf("%s", $1);
  for (i = 2; i < 20; i++) {
    printf("|%s", $(i));
  }
  for (i = 20; i < 22; i++) {
    s = $(i);
    gsub(/,/, ".", s);
    printf("|%s", s);
  }
  print "";
}

Puis :

cat toto.txt | awk -f script.awk

Exemple :

(mando@velvet) (~) $ cat toto.txt | awk 'BEGIN {FS="|"} ; {printf("%s",$1); for(i=2;i<20;i++) printf("|%s",$(i)); for(i=20;i<22;i++){ s=$(i); gsub(/,/, ".", s); printf("|%s",s);} print "";}' 1001|20015232851|||25 bld totl||75000|Paris||6|JOEAU|2206000|24/05/2013|25/06/2015||2001|2001|17592|C|48.860274|2.3450891001|20015246491|||41 rue court||75000|Paris||6|CAENS|289000|28/02/2014|30/07/2015||2001|2001|16141|C|48.88000|2.32417

Bonne chance

dubcek · Answer

hello
$ awk 'BEGIN {FS=OFS="|"} {sub(",", ".", $20); sub(",", ".", $21); print}' fichier1001|20015232851|||25 bld totl||75000|Paris||6|JOEAU|2206000|24/05/2013|25/06/2015||2001|2001|17592|C|48.860274|2.3450891001|20015246491|||41 rue court||75000|Paris||6|CAENS|289000|28/02/2014|30/07/2015||2001|2001|16141|C|48.88000|2.32417

pcsystemd · Answer

Un peu tard mais merci a tous.

Traitement fichier avec Sed, Awk ou autres

4 réponses

Discussions similaires

Newsletters