重複した文字列を一つにしたい

質問

入力された文字列から連続した特定の文字列を一つにまとめたいです。

例えば、まとめたい文字列が「123」だとすると、
「…abcdefghijk…」や
「…abcde123fghijk…」はそのままで
「…abcde123123123fghijk…」のようなものを
「…abcde123fghijk…」としたいです。

取り除くだけでしたら、
$mojiretu =~ s/123//g;
で簡単だったのですが、
やり方に見当もつかず悩んでいます。

回答No.1

osamuy · ベストアンサー

$_ = "abcde123123123fghijk";
$mojiretsu = $_;
$mojiretsu =~ s/(123)+/123/g;
print $_, ' -> ', $mojiretsu;

とか。

お礼

解決しました。ありがとうございます。
本当は記号の意味なども理解して使わないと
少し条件が変っただけでもまたつまづくのだとは
わかっているのですが、そのままコピペで使わせていただいております。