作者: Keiichi Takahashi
日時: 2002/3/05(13:01)
ビットウォークの高橋です。

山本さんの方へも連絡が行っているはずですが、山本さんのSubmitしたiso-2022
-jp関連のパッチがTclのCVSへ取り込まれたと、Jeffから連絡がありました。

確認のため、本日（12:00頃）のCVSでチェックした結果をお知らせします。サン
プルは山本さんから教えて頂いた次のものを使いました。

set jis [encoding convertto iso2022-jp abc\u3042\u3044\u3046]
binary scan $jis H* ret
puts $ret

結果は、

6162631b24422422242424261b2842

のようになりました。

>
>perlとJcode.pmは使えますか?
>使えるようでしたら次のスクリプトを試してみてください。
>
>use Jcode;
>print unpack( 'H*', Jcode->new( 'abcあいう' )->jis ), "\n";
>
>これの出力結果は「6162631b24422422242424261b2842」となります。
>これが正解です。
>

このサンプルに関しては、期待する結果を出力できるようにになったようです。

-- 
Keiichi Takahashi, bitWalk Co.,Ltd.
mailto:bitwalk@...
http://members10.tsukaeru.net/bitwalk/