プログラム質問箱への投稿
記事番号00699へのフォローを投稿します。
お名前(ペンネイムで結構ですが必要です)
(
ブラウザに個人情報を覚えさせない)
電子メイルアドレス(必要です)
題名(必要です)
Home Page がある方はリンク希望先の URL を記載して下さい
会議室に載せたい内容を以下へお書き下さい (
HTMLを解釈せずにそのまま表示)
6月9日に、くろみつさんは書きました。 >にあさん、お忙しい中、早速の返信ありがとうございました。 >詳しい説明なので、よくわかります。 > >6月8日に、にあさんは書きました。 > >>とりあえずEZとは何の事だか分からないんですが、(^^;; <A HREF="http://www.nttdocomo.co.jp/i/tag/emoji/" TARGET="help">ドコモの絵文字リスト</A>を見ると、 >>ずいぶん飛び飛びにコードが割り当てられているんですね。 >EZというのは、DDIセルラーやIDOなどで使っているEZWebとEZAccessのことです。 >PCのHTML,imodeのC-HTMLに対して、EZはHDMLという言語(正確にはWAP上で動くらしい...詳しい事はよくわかりません。)を使っていて、これがちょっとやっかいなんです。 > >>perlのヴァージョン5を使っているなら、上の簡単な式の代わりに、 >> >>$re_ascii = '[\x00-\x7F]'; >>$re_sjis_c = '[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC]'; >>$re_sjis_kana = '[\xA1-\xDF]'; >>$re_emoji = '\xF8[\x9F-\xFC]|\xF9[\x40-\x49\x72-\x7E\x80-\xB0]'; >> >>$str =~ s/\G((?:$re_ascii|$re_sjis_c|$re_sjis_kana)*?)(?:$re_emoji)/$1〓/g; # 複雑な式 >> >>とすれば、正しく、 >> >>「半角カナ(<FONT SIZE="SMALL">カナ</FONT>)やAlphabetが有っても絵文字(〓〓)は除けるけど、需要とかも化けてしまうかも?」 >> >>となります。 >> >># perl4だと、前回の一致位置のしっぽ(\G)も最短一致(*?)も無いので、 >># ループを回さなくてはいけないでしょうから面倒そう。取りあえずperl4版はパスです。(^^; >使っているperlは5です。(よかった。すみません、最初に書くのを忘れていました。) > >さっそく、使ってみます。
ホームペーヂに戻る
nir@mvg.biglobe.ne.jp
Last Update: 2 December 1999