>>214
$value =~ s/([0-9])/('０','１','２','３','４','５','６','７','８','９')[$1]/eg;
つぅのはどうでしょう？