CGI-BBS > CGI > Perl > 全角文字をばらして配列に入れたい


カレッヂ
カレッヂ


質問者 ひで  投稿日 10/8(月) 11:35:14
全角文字(日本語)をばらして
一文字ずつ、配列に入れたいのですが
うまくいきません、半角英数だと配列に入るのですが、
どなたか、教えて下さい。

$word="本日は晴天です";
@test = ($word =~ m/./g);

よろしくお願いします。
回答者 あけび  [削除]  投稿日 10/9(火) 01:00:58
$word="本日は晴天です";
$word=~s/(.)/$1\0/g;
$word=~s/([\x81-\x9f\xe0-\xfc])\0(.)\0/$1$2\0/g;
@test=split(/\0/,$word);

文字コードはSHIFT-JISに限定されますが、
全角文字/半角文字が混在していても大丈夫です。
質問者 ひで  [削除]  投稿日 10/9(火) 13:21:53
早速の回答ありがとう御座いました
無事かいけつです(正規表現はむずかしいですね)

返信(回答)する


Web裏技