Sortuj pola bezpośrednio

10

Próbuję posortować w wierszu danych wejściowych nad nieznaną liczbą pól:

Wejście:

ab bc
bc ab
cd ef bc 
bc cd ef
cd bc ab
ef ab bc cd gh

Wynik:

ab bc
ab bc
bc cd ef
bc cd ef
ab cb cd
ab bc cd ef gh

Używałem czegoś podobnego, awk '{if($2 < $1) print $2,$1;else print}'ale wydaje się, że byłoby bałagan na więcej niż dwóch polach. Jakaś pomoc?

Chris
źródło

Odpowiedzi:

8

Jeden sposób przy użyciu perl:

perl -lane 'printf qq[%s\n], join q[ ], sort @F' infile

Wynik:

ab bc
ab bc
bc cd ef
bc cd ef
ab bc cd
ab bc cd ef gh
Birei
źródło
2
ponieważ używasz -l, nie musisz drukować nowego wiersza. print join " ", sort @Fwystarczy.
glenn jackman
6

Jednym ze sposobów korzystania z GNU awk:

awk '{ 
    split($0, arr); 
    asort(arr); 
    for (i=1; i<=length(arr); i++) { 
        printf "%s ", arr[i] }; 
        printf RS 
    }
' infile

Wynik:

ab bc 
ab bc 
bc cd ef 
bc cd ef 
ab bc cd 
ab bc cd ef gh
Birei
źródło
2

Oto inne perlrozwiązanie, podobne do odpowiedzi @ Birei, ale bardziej zwięzłe:

$ perl -anle 'print "@{[sort @F]}"' file
ab bc
ab bc
bc cd ef
bc cd ef
ab bc cd
ab bc cd ef gh
Cuonglm
źródło
1

W skrypcie powłoki:

while read n    
do
   echo $(echo $n | tr " " "\n" | sort )
done < infile

(To rozwidla za dużo, preferuj rozwiązanie perl lub gnu awk)

Emmanuel
źródło