Perlについて文字列を一定文字数で改行したい。

質問者 まき 投稿日 7/22(月) 21:05:47 掲示板などで書き込まれたコメントを 強制的に一定文字数で(例えば5文字で)改行して表示したいのです。 例）$wordに「あいうえおかきくけこさしすせそ」があるとします。 これを、5文字毎に改行したいのです。 $word：「あいうえおかきくけこさしすせそ」 ↓ $newword：「あいうえお<br>かきくけこ<br>さしすせそ<br>」 for($i=0; $i<length($word); $i+=10) { $newword .= substr($word,$i,10); $newword .= "<br>"; } こうすると、コメント文が全て全角だと大丈夫なのですが、 半角文字が入ってしまうと、うまく表示できません。 正規表現を使って作るのでしょうか？？ 解る方がおりましたらぜひ教えてください。 よろしくお願いいたします プロバイ

[fn7]

文字数の取得