AWK对这样的不定项如何处理呢

richiewu

样板:
UserID FirstName LastName MiddleName Email DeptPrefix DeptSufix,比如
AB12345 Xiao Wang W xwang@dot.com T 200

我现在要得到这样的结果,方便下一步处理,就是合并LastName和MiddleName,合并DeptPrefix和DeptSufix

AB12345,Xiao,Wang W,xwang@dot.com,T200

问题在于MiddleName和DeptPrefix都是一个字母的,而且有的记录没有MiddleName,有的记录又没有DeptPrefix,该怎么办呢

多谢了

java_html

应该有几项是固定存在的并且这几项有一定的共同特征??这样便于判断哪几项记录不存在，否则真的难办了

ilwmin

如果没有规律应该没办法处理。等高手

ziyunfei

有@的肯定是$5

richiewu

回复 4# ziyunfei


    有可能是$4啊
我写了个脚本,不过有问题,最后一项合并不对,还没找到问题在哪里

awk '{
    if($4~/.*@.*/){
        if(NR=5){
            printf "%s,%s,%s,%s,%s\n", $1, $2, $3, $4, $5}
        else
            {printf "%s,%s,%s,%s,%s %s\n", $1, $2, $3, $4, $5, $6}
        }
   
    else if($5~/.*@.*/){
        if(NR=6){
            printf "%s,%s,%s %s,%s,%s\n", $1, $2, $3, $4, $5, $6}
        else
            {printf "%s,%s,%s %s,%s,%s %s\n", $1, $2, $3, $4, $5, $6, $7}
        }
   
}' $1

jason680

样板:
UserID FirstName LastName MiddleName Email DeptPrefix DeptSufix,比如
AB12345 Xiao Wang W  T  ...
richiewu 发表于 2011-08-04 17:11

给少数样本,才能写code啊...

yinyuemi

回复 1# richiewu

1. $ echo 'AB12345 Xiao Wang W xwang@dot.com T 200
   
2. AB12345 Xiao Wang W xwang@dot.com  200
   
3. AB12345 Xiao Wang  xwang@dot.com T 200
   
4. AB12345 Xiao Wang  xwang@dot.com  200' |awk '{printf $1","$2",";for(i=3;i<=NF;i++){if($i~/@/){t=i;while(t-->3)x=$t" "x;printf gensub(" $","",1,x)","$i",";while(i++<NF)printf $i;print"";x=""}}}'
   
5. AB12345,Xiao,Wang W,xwang@dot.com,T200
   
6. AB12345,Xiao,Wang W,xwang@dot.com,200
   
7. AB12345,Xiao,Wang,xwang@dot.com,T200
   
8. AB12345,Xiao,Wang,xwang@dot.com,200

复制代码

waker

1. sed '
   
2. s/  */,/1;
   
3. s/  */,/1;
   
4. s/  *\([^ ]*@[^ ]*\)  */,\1,/
   
5. s/\(.*,.*\)  *\(.*\)/\1\2/ ' urfile

复制代码

rdcwayx

1. awk 'function merge (x,y) {s=$x;x++;while (x<=y) {s=(x<a)?s FS $x:s $x;x++}; return s}
   
2. { for (i=3;i<=NF;i++) if ($i~/@/) a=i;
   
3.   print $1,$2,merge(3,a-1),$a,merge(a+1,NF)
   
4. }' OFS="," infile

复制代码

blackold

gawk:

1. awk '$(NF-2) ~ /@/{$(NF-1)=$(NF-1) $NF;NF--}NF==6{$3=$3$4;$4="";$0=$0}gsub(/ +/,",")' urfile

复制代码