フォームに入力された全角数字を半角数字に置換したいんですが、

$value =~ s/１/1/g;
みたいなのを１〜９まで繰り返すしか思いつかないのですが、一発でやるようなコーディングはありませんか？