全角英数字を半角に

RomanHankaku(KanaHankaku(フィールド名))

これをPerlとかJSとかでやろうとすると大変なのだ。