求助：文件处理：分割符

yinyuemi

回复 20# 红狐狸

1. echo '123, "11"1", "aaa, bbb, 1", "", 77, "12"2",' |\
   
2. awk '{$0=gensub(/("[^",]*)"([^",]*")/,"\\1 \\2","g",$0)
   
3.     l=split($0,a,"\"")
   
4.     for(i=1;i<=l;i++) $0=i==1?a[1]:$0"\""(!(i%2)?gensub(/, /," ","g",a[i]):a[i])
   
5.     }1'
   
6. 123, "11 1", "aaa bbb 1", "", 77, "12 2",
   

复制代码

springwind426

也许你应该考虑导出格式，而不是导出后想尽办法去重新处理

1. 
   
2. ,"abc"cd'ef,,',,"",  首尾,号之间是一个字段的值，这样的导出格式会让人抓狂的
   
3. 
   
4. 我对db2不了解，不过，它肯定可以设定导出格式的，比如分隔符、字段值是否加引号之类的
   
5. 你可以针对你的数据存储内容，来设定相应的导出格式，也利于后期处理
   

复制代码

红狐狸

回复 22# springwind426


    感谢大家的回复，事情确实是这样的，主要是导出的问题。因为他没按正常方式导出，导致后期处理麻烦。
但是我这只能获得结果，呵呵。感谢了

红狐狸

回复  红狐狸
yinyuemi 发表于 2011-06-22 02:52

   呵呵，还不是太看的懂你的代码（很希望能注释一下），不过我测试了下，至少发现逗号前无空格的情况，会出错

yinyuemi

回复 24# 红狐狸

1.     echo '123, "11"1", "aaa, bbb, 1", "", 77, "12"2",' |\
   
2.     awk '{$0=gensub(/("[^",]*)"([^",]*")/,"\\1 \\2","g",$0)  # 将所有【"11"1"】类似这样的格式中的【"】去掉，变成【"11 1"】，如果还有其他格式的话，你可以再想个办法
   
3.         l=split($0,a,"\"")  # split产生数组a，l 是数组a的长度
   
4.         for(i=1;i<=l;i++) $0=i==1?a[1]:$0"\""(!(i%2)?gensub(/, /," ","g",a[i]):a[i]) # 将【xxx, xxx, xx】中的逗号去掉，变成【xxx xxx xx】
   
5.         }1'
   
6.     123, "11 1", "aaa bbb 1", "", 77, "12 2",

复制代码

springwind426

1. 
   
2. perl -ne 's/“$/”,/;s/,?(".*?"),/\n$1\n/g;s/^\n//;s/\n$//;@F=split /\n/;for($i=0;$i<$#F;$i++){$F[$i]=~s/,/|/g if not $F[$i]=~/"/};print join( "|",@F),"\n"' datafile
   
3. 
   
4. 处理后，字段之间用|分隔
   

复制代码