文件区间整理问题---悬赏100分

qdwmail

blackold

回复 83# ly5066113


    强大的脚本，排版也很漂亮。

ly5066113

回复 99# expert1


以前还好，现在都忘光了。

瞬间到达

看看

ashlv

1. awk '
   
2. 
   
3. BEGIN {
   
4. 
   
5.         FS = "-"
   
6. 
   
7. }
   
8. 
   
9. /section/{
   
10. 
    
11.         s = $1
    
12. //这里
    
13.         c[++j]=s;
    
14. }
    
15. 
    
16. NF == 2 {
    
17. 
    
18.         if (NR == FNR)
    
19. 
    
20.         {
    
21. 
    
22.                 a[$0] = s
    
23. 
    
24.                 next
    
25. 
    
26.         }
    
27. 
    
28.         else {
    
29. 
    
30.                 for(i in a)
    
31. 
    
32.                 {
    
33. 
    
34.                         k = 0
    
35. 
    
36.                         split(i ,A ,"-")
    
37. 
    
38.                         if ($1 > A[1] && $1 <= A[2])
    
39. 
    
40.                         {
    
41. 
    
42.                                 a[A[1] "-" $1 - 1] = a[i]
    
43. 
    
44.                                 k = 1
    
45. 
    
46.                         }
    
47. 
    
48.                         if ($2 >= A[1] && $2 < A[2])
    
49. 
    
50.                         {
    
51. 
    
52.                                 a[$2 + 1 "-" A[2]] = a[i]
    
53. 
    
54.                                 k = 1
    
55. 
    
56.                         }
    
57. 
    
58.                         if($1 <= A[1] && $2 >= A[2])
    
59. 
    
60.                         {
    
61. 
    
62.                                 k = 1
    
63. 
    
64.                         }
    
65. 
    
66.                         if (k)
    
67. 
    
68.                                 delete a[i]
    
69. 
    
70.                 }
    
71. 
    
72.                 a[$0] = s
    
73. 
    
74.         }
    
75. 
    
76. }
    
77. 
    
78. END {
    
79. 
    
80.         for(i in a)
    
81. 
    
82.                 b[a[i]] = b[a[i]] "\n" i
    
83. //&这里
    
84. 
    
85.         for(i=1;i<=j;i++)
    
86. 
    
87.                 print c[i] "" b[c[i]]
    
88. 
    
89. }
    
90. 
    
91. ' a.txt b.txt

复制代码

看看这个行不,修改顺序最好只动输入输出部分

ashlv

回复 104# expert1


    噢,那是忘记去掉重复了,再加个hash去掉重复的后面一个,顺序就一样了

1. 
   
2. ...
   
3. /[a-zA-Z]+/{
   
4. 
   
5.         s = $1
   
6.         if(d[s]=="")
   
7.           d[c[++j]=s]++;
   
8. }
   
9. ...
   
10. END {
    
11.         for(i in a)
    
12.           b[a[i]] = b[a[i]] "\n" i
    
13.         for(i=1;i<=j;i++)
    
14.           print c[i] "" b[c[i]]
    
15. }
    
16. ...
    

复制代码

这样改一下

$ ./test.sh
tag1
15-20
10-14
tag2
200-300
1000-1001
hi
50-60
hello
700-900
tagx
500-600
$