- ベストアンサー
全角・半角が混じったテキストをバラバラにして配列に入れたい
perl5.8.5でCGIのプログラムを作っています。 全角・半角が混じったテキストを一文字ずつバラバラにして配列に入れたいと思っています。 プログラムの文字コードはEUCで書いています。 いろいろな方法が浮かぶのですがなるべくシンプルに書きたいと思っています。どのような方法がありますでしょうか。 教えてください。 よろしくお願いします。
- chachachar
- お礼率52% (63/120)
- Perl
- 回答数3
- ありがとう数4
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (2)
- TYWalker
- ベストアンサー率42% (281/661)
回答No.3
use encoding プラグマを使って陽に文字コードを指定すると普通に split で半角、全角に関わらず文字単位で分解されます。 use encoding "EUC-JP"; @split = split //, "hankakuと全角が混ざっている"; # 配列 @split の中を見てください
質問者
お礼
えっ、こんなに単純なという感じなんですね、勉強になります。 ありがとうございます。
- guci-ok
- ベストアンサー率33% (49/146)
回答No.1
私はSJISで仕事をすることが多いのですが、CPANの ShiftJIS::Stringを使っています。 私だったら、NKFでSJISにしてから、このモジュールを使います。 以下はワンライナーです。 C:\>perl -MShiftJIS::String=strsplit -le "print join('●', strsplit('', '文字コードはEUCで'))" 文●字●コ●ー●ド●は●E●U●C●で
質問者
お礼
ありがとうございます。
お礼
配列に入れるときにこういう書き方があるんですね。 ありがとうございます。 substrを使って一文字づつ引っ張ってきて配列に入れようとしていました。勉強になります。