请教，有这样一个数据文件，怎么转化成符合要求的格式?谢谢

jason.wang

1. 
   
2. 2008H99H9
   
3. 100-139
   
4. 200-219
   
5. 311,321,331,339
   
6. 312,322,332,336
   
7. 319,329
   
8. 318,328
   
9. 310,320,330
   
10. 313,323
    
11. 314,324
    
12. 333-335
    
13. 315,325,337-338
    
14. 316,326
    
15. 317,327
    
16. 471
    
17. 472
    
18. 474
    
19. 477
    
20. 478
    
21. 479
    
22. 470
    
23. 476
    
24. 475
    
25. 
    
26. 473
    
27. 
    
28. 340-341,343,346,351
    
29. 342,352
    
30. 353
    
31. 344,354
    
32. 345,355
    
33. 356
    

复制代码

现在需要把每行中“100-139”这种形式的转化成100，101，102，......，139
然后把第一行“2008H99H9”中第一个H前面的数字和下面每行中逗号分割的数字合并单列出来，比如，前4行处理完的结果是：

1. 
   
2. 2008100
   
3. 2008101
   
4. 2008102
   
5. 2008103
   
6. 2008104
   
7. 2008105
   
8. 2008106
   
9. ......
   
10. 2008139
    
11. 2008200
    
12. 2008201
    
13. 2008202
    
14. ......
    
15. 2008219
    
16. 2008311
    
17. 2008321
    
18. 2008331
    
19. 2008339
    
20. 
    

复制代码

这种规范的格式。空行要删除

寂寞烈火

没看懂 吼吼

jason.wang

老大 不会吧 我表达这么差?

寂寞烈火

要这样的结果?
2008100
2008101
......
......
2008479

jason.wang

老大 就是用每行含有的数字 加上那个前缀 组合成一个新的数字单独生成一行

jason.wang

不用排序 也不用管重复的数字,只要每个3位数字生成一个7位数字占一行就行了,这样说好理解吗  呵呵

jason.wang

比如说一行是"315,325,337-338"
我需要处理完的结果是
2008315
2008325
2008337
2008338

每行都要这样处理但空行不要

寂寞烈火

1. 
   
2. head=$(cat file|awk 'NR==1{print substr($0,1,4)}')
   
3. tr -s '\n'<file|awk 'NR>1{gsub(/,/,"\n");print}'|\
   
4. while read i;do
   
5.         if echo $i|grep -q '-';then
   
6.                 a=${i%%-*};b=${i##*-} #用子串比较用cut效率好
   
7.                 while((a<=b));do
   
8.                         echo $head$a;((a+=1))
   
9.                 done
   
10.         else
    
11.                 echo $head$i
    
12.         fi
    
13. #done|sort -n,需要的话
    
14. done

复制代码

测试:

2008100
2008101
2008102
2008103
2008104
2008105
2008106
2008107
2008108
2008109
2008110
2008111
2008112
......
2008476
2008475
2008473
2008340
2008341
2008343
2008346
2008351
2008342
2008352
2008353
2008344
2008354
2008345
2008355
2008356

jason.wang

老大 你太快了  偶像呀  我看看  谢谢!!

james_dlc

1：H的前面位数不一定4位时
2：在文件中不只一个。。。H时

试试这个



nawk -F,  '$0{if($0~/H/){a=substr($0,1,index($0,"H"-1);next}if($0~/-/){split($0,b,"-";for(;b[1]<b[2];b[1]++)print a b[1];next}for(i=1;i<=NF;i++)print a $i}'  infile