2005-10-27 ■ perl perl Jcodeをつかって、半角→全角にしたりするには、 Jcodeのtrを使います。 例: Jcode->new($str)->tr( 'アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨワヲン', '*')->euc(); カタカナを*に置換して、カタカナか、そうでないかを判別します。 いろんなものを置換できるので、これは便利です。