SJIS の機種依存文字、例えば○の中に 1 だったら (1) みたいに、
(株) や XI に変換するライブラリを知りませんか?Perl でも可です。