Discussion :

[jack-ft]

Bonjour,

J'ai un fichier qui me donne l'ordre de mes clés:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
$ cat cles.txt
UN
DEUX
TROIS
QUATRE
CINQ

J'ai un fichier à trier contenant une liste d'associations clé-valeur:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
$ cat file.txt
CINQ pas_du_tout
TROIS passionnement
DEUX beaucoup
QUATRE a_la_folie
UN un_peu

Je voudrais trier ce fichier dans l'ordre des clés du fichier de clés pour obtenir:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
$ tri-selon cles.txt file.txt 
UN un_peu
DEUX beaucoup
TROIS passionnement
QUATRE a_la_folie
CINQ pas_du_tout

Connaissez-vous une commande qui fasse ça?

Sinon, je peux toujours faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$ for cle in $(cat cles.txt); do egrep "^$cle " file.txt; done

mais c'est un peu en O(n*n)

ou bien bidouiller un truc du genre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
cat file.txt \
  | while read cle valeur ; do
    eval $cle=$valeur
    done
 
for cle in $(cat cles.txt); do
  eval echo $cle \$$cle
done

mais ça devient un peu plus compliqué si file.txt contient plusieurs colonnes...

Votre avis?

Merci d'avance

)jack(

[N_BaH]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
while read cle
do while read line
   do [ "${line% *}" = "$cle" ] && echo "$line"
   done <file.txt
done <cles.txt

c'est sûrement plus rapide en awk !

[jack-ft]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
while read cle
do while read line
   do [ "${line% *}" = "$cle" ] && echo "$line"
   done <file.txt
done <cles.txt

c'est sûrement plus rapide en awk !

Bonjour et merci d'avoir répondu.

Comme j'ai des comparaisons à faire au cours de l'évolution du fichier, je vais m'inspirer de ma dernière proposition

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
21
22
23
 
cles=$(cat cles.txt)
 
while true ; do
  cat file.txt \
    | while read cle valeur ; do
      eval ${cle}_new=$valeur
      done
 
  for cle in cles; do
     eval compare \$${cle}_old \$${cle}_new
  done
 
  for cle in cles; do
    eval echo $cle \$${cle}_new
  done
 
  for cle in cles; do
     eval ${cle}_old=\$${cle}_new
  done
 
  sleep 1
done

merci quand même

)jack(