[shell] 文本块排序

bluesmile11

朋友们请问我想用脚本实现这个功能该如何做呢？

待排序的文件
[root@shell /]# cat PROFESSOR.db
J Luo
Southeast University
Nanjing,China

Y Zhang
Victory University
Melbourne, Australia

D Hou
Beijing University
Beijing,China

B Liu
Shanghai Jiaotong University
Shanghai,China

C Lin
University of Toronto
Toronto,Canada

要求：对文本块根据学校的名字(每个文本块的第二行)进行排序，结果仍然能以文本块的格式输出。
没有思路，不知道怎么做？

英语盲学linux

1. awk 'BEGIN{RS="";FS="\n"}{a[$2]=$0}END{l=asorti(a,b);for(i=l;i>0;i--) print a[b[i]]"\n"}'
   
2. 要的这种吗？

复制代码

waker

回复 2# 英语盲学linux


    如果有两个同校的呢?

personball

回复 1# bluesmile11


    比较折腾一点：

1. 
   
2. $cat sortbyblock
   
3. J Luo
   
4. Southeast University
   
5. Nanjing,China
   
6. 
   
7. Y Zhang
   
8. Victory University
   
9. Melbourne, Australia
   
10. 
    
11. D Hou
    
12. Beijing University
    
13. Beijing,China
    
14. 
    
15. B Liu
    
16. Shanghai Jiaotong University
    
17. Shanghai,China
    
18. 
    
19. C Lin
    
20. University of Toronto
    
21. Toronto,Canada
    
22. 
    
23. $awk  'BEGIN{RS="";FS="\n"}{for(i=1;i<=NF;i++)printf $i"* ";print "";}' sortbyblock|sort +2 -3|sed 's/\*\ /\n/g'
    
24. D Hou
    
25. Beijing University
    
26. Beijing,China
    
27. 
    
28. B Liu
    
29. Shanghai Jiaotong University
    
30. Shanghai,China
    
31. 
    
32. J Luo
    
33. Southeast University
    
34. Nanjing,China
    
35. 
    
36. C Lin
    
37. University of Toronto
    
38. Toronto,Canada
    
39. 
    
40. Y Zhang
    
41. Victory University
    
42. Melbourne, Australia
    

复制代码

seesea2517

sort 没找到类似 awk RS 的参数，就先把文件转换成一行一个记录再来排序：

1. # 这个第一行多一个空行，没做处理
   
2. [seesea@UC ~]$ sed -n 'H; $ba; /^$/ba; b; :a; x; s/\n/\|/g; p' PROFESSOR.db  | sort -t'|' -k3,3  | tr '|' '\n'
   
3. 
   
4. D Hou
   
5. Beijing University
   
6. Beijing,China
   
7. 
   
8. 
   
9. B Liu
   
10. Shanghai Jiaotong University
    
11. Shanghai,China
    
12. 
    
13. 
    
14. J Luo
    
15. Southeast University
    
16. Nanjing,China
    
17. 
    
18. 
    
19. C Lin
    
20. University of Toronto
    
21. Toronto,Canada
    
22. 
    
23. Y Zhang
    
24. Victory University
    
25. Melbourne, Australia
    
26. 
    
27. # 这个没有多的空行了
    
28. [seesea@UC ~]$ cat PROFESSOR.db | tr '\n' '|' | sed 's/||/\n/g' | sort -t'|' -k2,2 | sed 's/$/\n/g' | tr '|' '\n'
    
29. D Hou
    
30. Beijing University
    
31. Beijing,China
    
32. 
    
33. B Liu
    
34. Shanghai Jiaotong University
    
35. Shanghai,China
    
36. 
    
37. J Luo
    
38. Southeast University
    
39. Nanjing,China
    
40. 
    
41. C Lin
    
42. University of Toronto
    
43. Toronto,Canada
    
44. 
    
45. 
    
46. Y Zhang
    
47. Victory University
    
48. Melbourne, Australia
    
49. 
    

复制代码

blackold

对二楼稍加修改就解决同校问题了。

英语盲学linux

回复 3# waker

1. 数组下标改下 比如a[$2NR]

复制代码

bluesmile11

谢谢朋友们的解答，学习学习

MeaCulpa

4, 5 楼是常用的方法，也是为什么除了gawk其他awk都没有实现sort的原因。 重复造轮子没必要，unix sort足矣

bluesmile11

回复 4# personball


你好请问
1.sortbyblock
2.|sort +2 -3

请问sort你这些写的意思是什么？