请帮助修改个awk代码,谢谢!

sh/bash/dash/ksh/zsh等Shell脚本
回复
xysm
帖子: 2
注册时间: 2016-04-13 14:04
系统: win7

请帮助修改个awk代码,谢谢!

#1

帖子 xysm » 2016-04-13 14:20

修改成连接在一起的awk

第一个:

代码: 全选

awk '{
    a[length($0)][$0]++
}
END{
    for(i=1;i<=length(a);i++){
        n=0
        for(j in a[i]){
            if(a[i][j]>=6){
                print j RS j RS #可注释掉此行.
                }else {
                    b[i][++n]=j
                }
            }
        }

        for(i=1;i<=length(a);i++){
            print b[i][1] RS b[i][length(b[i])] RS
        }
    }'

另外,如果能注释掉上面的行,请另外给个注释后直接连接在一起的代码


第二个:

[codeawk 'd!=$1{b[++k]=$1;d=$1}{a[$1]++;c[length()][$1]}
END{for(i=1;i<=k;i++)
if(a[b]>=6){
print b"\n"b
}
else{
if(!p){
print b
p=1
}else{
if(!(b[i+1] in c[length(b)])){
print b
p=0
}
}
}
print b[k]
}'][/code]


另外,如果把第4行注释,请另外给个注释后连接在一起的代码




谢谢大神,辛苦了。请耽误你点时间帮助下吧
上次由 xysm 在 2016-04-15 5:49,总共编辑 1 次。
xysm
帖子: 2
注册时间: 2016-04-13 14:04
系统: win7

Re: 请帮助修改个awk代码,谢谢!

#2

帖子 xysm » 2016-04-13 14:39

怎样变成这种格式?请会的说说

http://v2.freep.cn/3tb_160413150450dhhd512293.jpg
回复