sed,awk多条件匹配求助帖

夏洛特猫

本文来源：http://www.155245.com/www_els001_com/

申博真人娱乐网直营,　　稿件请致：news#citnews.com.cn（请把#换成@），期待您的参与!　　2.入驻专栏()　　面向个人用户，提供内容创作、管理及发布功能，为你的优质内容提供多终端推广及更多更精准用户群推荐服务，树立个人的媒体品牌，拓展个人知名度及影响力。”在同学们的帮助下，爷爷将贺铃峻送到了5楼教室，还是累得满头大汗。时间：2014-05-2317:20:45来源：贵阳网您想在初夏交替的季节里体验浓浓温泉么？您想动动手指就能免费领门票和旅游大奖么？您想在自驾泡温泉的同时赢取超值汽车大奖么？时间：2014-05-1208:36:35来源：贵阳日报5月11日，贵阳市2014年“全国城市节水宣传周”系列活动在筑城广场启动，贵阳日报传媒集团贵阳网卫星直播车进行现场直播，拉开全省“节水宣传周”活动序幕。以下就是TheStreet文章的主要内容。

或者可以带上帝空御魔圈。当日清晨，山东省枣庄市山亭区上空出现大面积“鱼鳞云”，在初秋蓝天的映衬下，美不胜收。其中，国家中医药管理局办公室荣获“2016中国社会责任健康促进奖”，来自医疗、健康领域的企业及企业家表现亮眼，将多项大奖收入囊中。时间：2016-06-1414:31:00来源：贵阳网综合贵州山秀水美，气候凉爽，是国内“自然风景”旅游的绝佳选择。

时间：2016-12-0808:09:54来源：新华社上海市人社部门表示，外语和计算机将不作为职称评审的前置条件，可由用人主体自主确定外语和计算机应用能力水平。时间：2016-10-2403:50:25来源：搜狐体育穆里尼奥赛后表示：“如果我们抛开球队在防守端犯得错误，其实这场比赛球队表现得很好。由于好似一轮石头围成的月亮，当地傈僳族群众称之为“亚哈巴”，意思是“石月亮”。共同社表示，曾经依赖日元贬值及股市红利的“安倍经济学”面临拐点，财政运营愈发艰难。

　　趋势是给的，也就是说行情是市场给的。　　(十八)各级文化行政部门和文化市场综合执法机构要加强对辖区内网络游戏经营单位的指导、服务和培训工作。时间：2016-11-1309:00:49来源：贵阳网-贵阳晚报严禁拉票贿选　严禁买官卖官　时间：2016-11-0711:08:58来源：贵阳网正当全省干部群众深入学习贯彻党的十八届六中全会精神之际，我们迎来了第十七个中国记者节。其中，国家中医药管理局办公室荣获“2016中国社会责任健康促进奖”，来自医疗、健康领域的企业及企业家表现亮眼，将多项大奖收入囊中。

求教各位如何试下如下的替换，谢谢给为帮忙~~
处理需求：匹配单引号和双引号外的逗号并将其替换为|


文本样式："abc","ab(a,b)c",'aba,ec+c()',"aabcd"
转换后的结果需求："abc"|"ab(a,b)c"|'aba,ec+c()'|"aabcd"

legs

1. cat test

复制代码

"abc","ab(a,b)c",'aba,ec+c()',"aab,cd"

1. perl -pe's#["\x27][^"\x27]+["\x27](*SKIP)(*F)|,#|#g' test

复制代码

"abc"|"ab(a,b)c"|'aba,ec+c()'|"aab,cd"

daixubinbin

-- 不完美版本，只适用于题干给出的例子，不具有，期待其他大佬的回复

申博真人娱乐网直营本友会机友会摄友会

win,linux,通用的powershell代码

1. $a = @'
   
2. "abc","ab(a,b)c",'aba,ec+c()',"aabcd"
   
3. '@
   
4. 
   
5. $b = @'
   
6. ',"
   
7. '@
   
8. 
   
9. $b2 = @'
   
10. '|"
    
11. '@
    
12. 
    
13. $c = @'
    
14. ",'
    
15. '@
    
16. 
    
17. $c2 = @'
    
18. "|'
    
19. '@
    
20. 
    
21. $a.Replace('","','"|"').
    
22. replace($b,$b2).
    
23. replace($c,$c2)
    

复制代码

v5_6000

cat test | sed 's/","/"|"/g'| sed 's/'\'',"/'\''|"/g'| sed 's/",'\''/"|'\''/g'

v5_6000

1. cat test | sed 's/","/"|"/g'| sed 's/'\'',"/'\''|"/g'| sed 's/",'\''/"|'\''/g'

复制代码

ll104567

perl -nle '@a=/([\x22\x27][^\x22\x27]+[\x22\x27])/g;print join "|",@a'

a5love3n

1. sed -r "s/([\'\"]),([\'\"])/\1\|\2/g" file

复制代码

a5love3n

1. <div class="blockcode"><blockquote>通用型
   
2. sed -r -e 's/(\"[^\"]*\"[^,]*),/\1\|/g' -e "s/('[^']*'[^,]),/\1\|/g"
   
3. 可以实现以下效果
   
4. 文本
   
5. "abc","ab(a,b)c"A,B'aba,ec+c()'B,"aabcd"
   
6. 效果
   
7. "abc"|"ab(a,b)c"A|B'aba,ec+c()'B|"aabcd"

复制代码

wh7211

回复 1# 夏洛特猫

1. cat 1                                                                                                  
   
2. "abc","ab(a,b)c",'aba,ec+c()',"aabcd"
   
3. 
   
4. awk 'BEGIN{FS=OFS=""}{for(i=1;i<=NF;i++){if($i~"\042|\047"){a=a?0:1}else if($i~","){$i=!a?"|":$i}}}1' 1
   
5. "abc"|"ab(a,b)c"|'aba,ec+c()'|"aabcd"

复制代码