janneyabc 发表于 2017-5-19 12:03:41

perl 利用正则表达式 删除重复单词

　　假设有一段文本，要把它们中重复的单词删除，可以用正则表达式加以实现，请看以下例子
　　$_='Pairs is The The The The spring.';
　　while s/\b(\w+) \1\b/$1/gi ;
　　假如没有while则，$_变为
　　Pairs is The The spring
　　注意：
　　\1表示匹配的第一个分组，$1也是，但两者使用的地方不同，前者是在模式中，后者是在结果中
页: [1]
查看完整版本: perl 利用正则表达式 删除重复单词