NCR to Shift JIS

Hi all,

I have a requirement whrein i need to convert the NCR values
representing Japanese characters back into the Shift_JIS equivalent
characters. Is there a Perl code/module available for the same.

Thanks in advance,

Mallik.