半角全角混合の文字数

質問

掲示板を作成しています。
たとえば、書き込み時にタイトルが半角20文字を超えたら、それ以降は削除しその末尾に「…」を加える。といったようなことをしたいのですが、半角と全角を混合したタイトル（たとえば、半角19文字で、最後に全角1文字）だと文字化けをおこしてしまいます。こういう場合は多めに半角21文字にすればいいとは思いましたが、

区切り方が単純に、
$title =substr($title,0,20) . "…";
としているので現時点では実現していません。そこでなにかスタイリッシュでいい方法は無いでしょうか？アドバイスだけでも結構です。文字コードはsjisなのですが、移植性のある方法があればよろしくお願いします。

回答No.1

noname#25358 · ベストアンサー

俺が使ってんのは次のような方法です。

$title = substr($title, 0, 20);
$w = '';
$title =~ s/([\x81-\x9f\xe0-\xef].|[^\x81-\x9f\xe0-\xef])/$w.=$&/eg;
$title = $w;
$title .= '...';

　これを使うと、テイルバイトのない不正な２バイトコードを除去できます。
　ただしシフトＪＩＳ専用です(^_^;
　ＥＵＣにも対応できるようなのは作ったことありません(笑)

お礼

なるほど～
これなら他のコードにも応じた記述ができそうです！
ありがとうございましたー