正規表現のプロの方々のお力をお借りしたく、質問をさせてください。

perl のマッチングで文章中の全角数字を的確に取得したいのですが、
どうにもこうにも化けてしまいます。

$value = "もしかして７６２はバカ？";
if($value =~ /([０１２３４５６７８９]*)/){
　　　　$match = $1 ;
　　　　print "$match \n"; #←「・」となってちゃんと取得できてない
}

環境：
　　Perl5 (ActivePerl)
　　Win2k
　　文字コードはSJISで。

どうすればよいのでしょうか・・・