Zazelです。
=== kbk@... (Bruce.) さんが書かれた
=== <20050904050547.38F612161A8@...> にて
> http://www.kt.rim.or.jp/~kbk/perl-5.8/
>
> にちょっと書きましたが、ARGV経由のストリームにはuse encoding の効果が
> 及ばないみたいですし。
えーと、use encoding の影響範囲は スクリプト STDIN STDOUT で
utf8変換されると理解しているのですが、認識合ってますか?
だから <> を使うと危険なのは当り前というか。
その上で、use encoding するときは通常のファイル入出力も
レイヤー等でutf8化しないと整合性がとれなくなると思っています。
utf8フラグも厄介だけど。
以上を踏まえると、藤岡さんのスクリプトはuse encoding してるのに、
処理の前にShift_JIS化しているのが問題だと思っています。
そこをutf8にすれば動いたりしませんかねえ。
(* SEKI Masatoshi // Zazel *)
(* Would you hold my hand? Softly, let's linger. *)