sedでタグに囲まれた文字列を同じ文字数で変換する方法わかる人いますか？

Question

以下のコマンドでpタグに入っている文字を「ダミーテキストがはいります。」に変換することができました。

sed -e 's\<p>.*</p>\<p>ダミーテキストがはいります。</p>\g'

今回やりたいことは、元々入っている文字の数に応じて、「ダミーテキストがはいります。」の文字数が変わるというプログラムです。

例えば、以下のコードがあったとします。

<p>今回やりたいことは、元々入っている文字の数に応じて、「ダミーテキストがはいります。」の文字数が変わるというプログラムです。</p>

このコードを以下のように変換したいです。

<p>ダミーテキストがはいります。ダミーテキストがはいります。ダミーテキストがはいります。ダミーテキストがはいります。ダミーテキ</p>

文字数を変更前に合わせる、上記のようなことは可能なのでしょうか？
もしわかる方がいらっしゃれば教えて頂きたいです。

Answer 1

sedだけでは、文字列の長さを測ることができないので、現実的ではないです。
やろうとすると、文字数の上限を100とか仮定した上で、100文字の場合、99文字の場合、、、、、、1文字の場合などとsコマンドを100個並べることになります。

Comments

[otn]

Rubyで
ruby -lpe 'R="ダミーテキストがはいります。";L=R.size
gsub(%r|(?<=<p>)(.*?)(?=</p>)|){|x| (R*(x.size/L+1))[0,x.size]}'

[toss]

rubyはわからないのですが、ご丁寧にありがとうございました。
参考にさせていただきます。

[otn]

sed 's:<p>[^<]\{100\}</p>:<p>置き換える100文字</p>:g;t;s:<p>[^<]\{99\}</p>:～～～

こんな感じで。t コマンドの意味はman sedで。

Answer 2

sedでは難しいと思います。perlなら比較的簡単です。こんな感じで多分できると思います。

perl -CIO -Mutf8 -pe 'BEGIN{$t="ダミーテキストがはいります。"; $l=length($t)} s#<p>(.*?)</p>#$ll=length($1), $x=($t x ($ll/$l)).substr($t,0, $ll % $l), "<p>$x</p>"#ge;'