请教sed实现[5:0] aaa转换为aaa[0]......的方法

jiawei2426

请教如下问题的解决办法，非常感谢先
源文件：
[5:0] aaa
[3:0] bbb
[1:0] ccc
希望通过sed使其显示如下：
aaa[0]
aaa[1]
aaa[2]
aaa[3]
aaa[4]
aaa[5]
bbb[0]
bbb[1]
bbb[2]
bbb[3]
ccc[0]
ccc[1]

reyleon

1. awk '{for(i=0;i<=substr($1,2,1);i++)print $2"["i"]"}' file

复制代码

jiawei2426

哦，谢谢楼上，awk确实很强大啊，不过有个疑问，假如源文件中还存在一行[11:0] ddd  即源文件又有一位数的阵列，也有两位数的阵列，该如何批处理呢？

jason680

回复 3# jiawei2426

$ awk -F'[]:[ ]+' '{for(n=$3;n<=$2;n++)print $4"["n"]"}' FILE
aaa[0]
aaa[1]
...
aaa[5]
bbb[0]
bbb[1]
...
bbb[3]
ccc[0]
ccc[1]
ddd[0]
ddd[1]
...
ddd[9]
ddd[10]
ddd[11]

   

reyleon

回复 3# jiawei2426

是我考虑不周, 应该是这样的

1. awk '{for(i=0;i<=(substr($1,2,index($1,":")-2)+0);i++)print $2"["i"]"}' file

复制代码

jiawei2426

谢谢楼上两位高人指点，确实好用

karma_2015

借楼主帖子一用　：）
－－－－－－－－－－－－－－－
为了节省版面，用空格代替换行：

1. 
   
2. function do_line()
   
3.         vim:normal("^f:")
   
4.         vim:normal("Bw")                        --back to start index
   
5.         local m = vim:atoi()        --read start index
   
6.         vim:normal("ww")                --forard to end index
   
7.         local n = vim:atoi()        --read end index
   
8.         vim:normal("W")  vim:normal("vEy")                --read suffix(namely, aaa, bbb...)
   
9.         local seg = ""
   
10.         for i = n, m do
    
11.                  seg  = seg .. string.format("%s[%d] ", vim:clipboard(), i)
    
12.         end
    
13.         print(seg)
    
14. end
    
15. 
    
16. vim:open("1.txt")
    
17. repeat
    
18.         do_line()       
    
19. until vim:normal("j") == 0
    

复制代码