それはさておき、日本語混じり文の中の全角数字を半角数字に変換したいのですがやり方が分かりません。
ググッて見つけた方法をいくつかテストしてみたのですが、全てダメでした。
例：「２ちゃんねる」を「2ちゃんねる」に変換したい。

・テストコードその１（正攻法）
my $txt = '２ちゃんねる';
$txt =~ tr/０−９/0-9/;
結果：文字化け　「0Q0ｿ000ﾋ0」

・テストコードその２（Jcodeを使うといいらしい？）
use Jcode;
my $txt = '２ちゃんねる';
my $txt2 = jcode($txt)->tr('０−９', '0-9');
結果：文字化け　「｣ｲ､d网ﾍ､」

・テストコードその３（tr('[０-９]', '[0-9]')はEUCでないとだめ。スクリプトがSJISの場合は変換必要らしい？）
use Jcode;
my $txt = '２ちゃんねる';
my $from = jcode('０−９')->euc;
my $to = jcode('[0-9]-')->euc;
my $txt2 = jcode($txt)->tr($from, $to);
結果：文字化け　「｣ｲ､d网ﾍ､」

・テストコードその４（スクリプトをEUCにしてjcode.pl使用）
require './jcode.pl';
my $txt = '２ちゃんねる';
jcode::tr(\$txt, '０-９', '0-9');
結果：「２」はOKだが、日本語が文字化け　「2､d网ﾍ､」

どのようにしたら、うまく変換できるでしょうか。