Chinaunix首页 | 论坛 | 博客
  • 博客访问: 258152
  • 博文数量: 54
  • 博客积分: 35
  • 博客等级: 民兵
  • 技术积分: 729
  • 用 户 组: 普通用户
  • 注册时间: 2012-02-09 10:35
文章分类

全部博文(54)

文章存档

2014年(37)

2013年(17)

分类: LINUX

2014-02-09 14:05:14

原帖:

具体要求请看原帖。

点击(此处)折叠或打开

  1. #!/bin/awk -f
  2. BEGIN{FS="[][]";limit=10}
  3. {
  4.         for(i=0;i++<NF;){
  5.                 if(i%2)t=$i
  6.                 else{
  7.                         if(i>2){
  8.                                 for(j=0;j++<length(b[i-2]);){
  9.                                         for(k=0;k++<split($i,a,"");){
  10.                                                 b[i][++n]=b[i-2][j]""t""a[k]
  11.                                                 if(i==NF-1)b[i][n]=b[i][n]$(i+1)
  12.                                         }
  13.                                         if(n>=limit)break
  14.                                 }
  15.                                 n=0
  16.                         }else for(j=0;j++<split($i,a,"");)b[2][j]=t""a[j]
  17.                 }
  18.         }
  19.         for(i=1;i<=limit&&i<=length(b[NF-1]);i++)print b[NF-1][i] > "file."NR
  20.         delete b
  21. }

阅读(1165) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~