Perl 5.8.1を使用して全角かなを半角かなにする処理を行いたいのですが、そのような関数はありますでしょうか。いろいろ探してみましたが見つけられませんでした。

（半角かなから全角かなはたくさんあるようです）また、jcode.pl,jcode.pmは使用しないでその処理を行いたいのです。
もしそのような関数、または、そのような処理を行うソースファイルがありましたら、教えていただけませんでしょうか。