写一个sed

V_客

看到sed，我只能说自己太水了

cjaizss

yestreenstars 发表于 2013-03-14 20:38
比较大小和找出位置貌似不是sed的专长哦~可以用awk么？如果要用sed的话，可以借助shell么？

正是因为不擅长，我才归为“游戏娱乐”啊
呵呵

cjaizss

yestreenstars 发表于 2013-03-14 20:38
比较大小和找出位置貌似不是sed的专长哦~可以用awk么？如果要用sed的话，可以借助shell么？

纯的sed
里面不可以用比如e这样的命令

yestreenstars

呵呵，那像00123xdsd0176ddsdw0201eew得到的结果是0201 19还是201 20呢？

seesea2517

折腾了一下，还没研究怎么把位置弄上去，要是折腾不出来就研究研究hbmhalley大侠的方法是怎样的。

1. 
   
2. s/[^0-9]+/\n/g
   
3. s/^|$/\n/g
   
4. 
   
5. # Remove heading zeros
   
6. s/\n0*/\n/g
   
7. 
   
8. # Remove the same numbers except first one
   
9. :Uniq
   
10.   s/\n([^\n]+)(.*)\n\1\n/\n\1\2\n/
    
11.   t Uniq
    
12. 
    
13. s/\n+$//
    
14. 
    
15. # JudgeNums
    
16. s/\n([^ \n]*)/\n\1 \1 \1/g
    
17. # s/\n([^ \n]*)/\n0 \1 \1/g
    
18. # y/0123456789/1234567890/
    
19. 
    
20. :Add#
    
21.   s/\n(#*)[0-9]/\n\1#/g
    
22.   t Add#
    
23. 
    
24. :Rm#
    
25.   s/\n#/\n/g
    
26.   /#/s/\n[^#]*\n/\n/g
    
27.   /#/bRm#
    
28. 
    
29. # Rm head spaces
    
30. s/\n */\n/g
    
31. 
    
32. :SubHead
    
33.   s/\n1/\n0/g
    
34.   s/\n2/\n1/g
    
35.   s/\n3/\n2/g
    
36.   s/\n4/\n3/g
    
37.   s/\n5/\n4/g
    
38.   s/\n6/\n5/g
    
39.   s/\n7/\n6/g
    
40.   s/\n8/\n7/g
    
41.   s/\n9/\n8/g
    
42. 
    
43.   # Delete 0
    
44.   h
    
45.   s/\n0[^\n]*//g
    
46.   /^$/{
    
47.     g
    
48.     s/\n0/\n/g
    
49.   }
    
50.   /^\n[^\n]*$/!b SubHead
    
51. 
    
52. :Last
    
53. s/\n[^ ]* //
    

复制代码

yestreenstars

现在好忙啊，我有空也折腾折腾~

cjaizss

呵呵，sed 两个数字（注意是数字，不是数）比较大小其实很容易
有个技巧
在尾部加上0123456789
然后
([0-9])XXXXX([0-9])xxxxxx\1[0-9]*\2[0-9]*$
([0-9])XXXXX([0-9])xxxxxx\2[0-9]*\1[0-9]*$
即可
呵呵
hbmhalley 思路OK,但有BUG

cjaizss

yestreenstars 发表于 2013-03-15 15:48
呵呵，那像00123xdsd0176ddsdw0201eew得到的结果是0201 19还是201 20呢？

0201 19
吧
0021xxx21
你想输出哪个都可以

reyleon

一头雾水

cjaizss

1. 
   
2. #!/usr/bin/sed -rnf
   
3. /[0-9]/!d
   
4. s/[^0-9]/ /g
   
5. s/$/ 0123456789/
   
6. tloop
   
7. :loop
   
8. s/^( *)([0-9]+)( +)([0-9]+)( .*0123456789)$/\1b\2e\3b\4e\5/
   
9. tmain
   
10. 
    
11. #if only one number stayed,then output
    
12. h
    
13. s/[0-9].*/ /
    
14. s/./1/g
    
15. :cnt
    
16. s/(^|;)1111111111/1;/g
    
17. tcnt
    
18. s/111111111/9/g
    
19. s/11111111/8/g
    
20. s/1111111/7/g
    
21. s/111111/6/g
    
22. s/11111/5/g
    
23. s/1111/4/g
    
24. s/111/3/g
    
25. s/11/2/g
    
26. :zero
    
27. s/;;/;0;/g
    
28. tzero
    
29. s/(^$)|;$/0/
    
30. s/;//g
    
31. G
    
32. tend
    
33. :end
    
34. s/(.*)\n *([0-9]+).*0123456789$/\2 \1/
    
35. tend2
    
36. d
    
37. :end2
    
38. p
    
39. d
    
40. 
    
41. :main
    
42. s/b(0+)/\1b/g
    
43. h
    
44. :a
    
45. s/(bf*)[0-9]/\1f/
    
46. ta
    
47. /(bf*)e.*\1f/ {
    
48.         :e
    
49.         g
    
50.         :b
    
51.         s/[0-9]([0-9]*b.*b)/ \1/
    
52.         tb
    
53.         :B
    
54.         s/(b *)[0-9](.*b)/\1 \2/
    
55.         tB
    
56.         s/[be]//g
    
57.         tloop
    
58. }
    
59. s/(bf*e)(.*)(bf*e)/\3\1/
    
60. /(bf*)e.*\1f/ {
    
61.         :f
    
62.         g
    
63.         :c
    
64.         s/(e.* )[0-9]([0-9]*b)/\1 \2/
    
65.         tc
    
66.         :C
    
67.         s/(b *)[0-9]([^b]+)$/\1 \2/
    
68.         tC
    
69.         s/[be]//g
    
70.         tloop
    
71. }
    
72. g
    
73. :d
    
74. /b(.).*b\1/! {
    
75.         /b(.).*b(.).*\1[0-9]*\2[0-9]*$/be
    
76.         bf
    
77. }
    
78. 
    
79. s/b([0-9])(.*)b([0-9])/\1b\2\3b/
    
80. td
    
81. be
    

复制代码