sed如何获取pattern所匹配到的字符数？

Looiml

想破脑袋也没想到高端、大气、上档次的办法，各位看官有何良策？
普遍场景是，假如sed用pattern匹配到一个字串（pattern可以有千千万万种，并不局限于一种），如何获取匹配到的字串的字符数，比如我要在这后面加入相同数量的其他字符。

假如有如下文本：

1. dkskkakdkkakxxxxxkdikkkdk
   
2. sdkdkkskxxdiikxxkdidididiidid

复制代码

如何只用sed在连续的x后面加上相同数量的k，得到：

1. dkskkakdkkakxxxxxkkkkkkdikkkdk
   
2. sdkdkkskxxkkdiikxxkkkdidididiidid

复制代码

我目前想到的方式是每个字符后插入，然后依次交换：

1. sed -r -e 's/x/xk/g' -e ':1;s/x(k+)x/xx\1/;t1' a

复制代码

但预感这不是最好的方式。

在此向各位慕求更简洁、高效的解决方式。

blackold

回复 1# Looiml


    可以用Hold space解决。

Looiml

回复 2# blackold

老黑哥能贴一贴代码吗？
   

jason680

回复 1# Looiml

高端、大气、上档次.... try this way

$ echo "dkskkakdkkakxxxxxkdikkkdk
sdkdkkskxxdiikxxkdidididiidid" | perl -pe '{s/(x+)/$1 . "k" x length($1)/ge}'
dkskkakdkkakxxxxxkkkkkkdikkkdk
sdkdkkskxxkkdiikxxkkkdidididiidid

   

Looiml

回复 4# jason680

Perl文本处理能力强是公认的，不过我没学过，我更喜欢Python的优雅，不过诞生自Perl的PCRE倒是传播得很广，在好几门其他语言里都碰到了。
扯远了。。。如果硬要用sed呢？
   

jason680

回复 5# Looiml

forget the 高端、大气、上档次 if you still want to use sed

难懂,找苦吃,我不会... sorry, I don't know how to use sed for this issue   

pengmingguo

楼主的方法已经很碉堡了，jason680大神都没有好方法的话就没有了。。。。。。。。。。。。。。。

jason680

回复 5# Looiml

Sorry, I found your solution had some bug ...

$ echo 123xxx456 | sed -r -e 's/x/xk/g' -e ':1;s/x(k+)x/xx\1/;t1'
123xxxkkk456

$ echo 123xxx456 | perl -pe '{s/(x+)/$1 . "k" x length($1)/ge}'
123xxxkkk456

$ echo 123xkxkx456 | sed -r -e 's/x/xk/g' -e ':1;s/x(k+)x/xx\1/;t1'
123xxxkkkkk456

$ echo 123xkxkx456 | perl -pe '{s/(x+)/$1 . "k" x length($1)/ge}'
123xkkxkkxk456

   

Herowinter

感觉awk match做比较简单。

Looiml

回复 8# jason680

你咋这么聪明呢？看个电影回来让我瞅到这么一严重的bug，多么的感伤！那岂不是还要多加一条？快到我的底线了。。。

1. $>echo 123xkxkx456 | sed -r -e 's/x+/&\x00/g' -e 's/x/xk/g' -e ':1;s/x(k+)x/xx\1/;t1'
   
2. 123xkkxkkxk456
   

复制代码