ShiftJIS::X0213::MapUTF is a Perl module that provides functions to convert from Shift_JIS-2004 (specified by JIS X 0213:2004) to Unicode, and vice versa.
For backward compatibility, this module also provides functions to convert from Shift_JISX0213 (specified by JIS X 0213:2000) to Unicode, and vice versa.
For convenience, "SJIS-X" is used to refer to both Shift_JIS-2004 and Shift_JISX0213 hereafter.
The following 10 JIS Kanji characters are added in JIS X 0213:2004. These mappings are used only for Shift_JIS-2004, and not for Shift_JISX0213.
sjis2004 unicode 3.2.0
0x879F U+4FF1
0x889E U+525D
0x9873 U+20B9F
0x989E U+541E
0xEAA5 U+5653
0xEFF8 U+59F8
0xEFF9 U+5C5B
0xEFFA U+5E77
0xEFFB U+7626
0xEFFC U+7E6B
SYNOPSIS
use ShiftJIS::X0213::MapUTF;
# for Shift_JIS-2004
$utf16be_string = sjis2004_to_utf16be($sjis2004_string);
$sjis2004_string = utf16be_to_sjis2004($utf16be_string);
# for Shift_JISX0213
$utf16be_string = sjis0213_to_utf16be($sjis0213_string);
$sjis0213_string = utf16be_to_sjis0213($utf16be_string);
Product's homepage
Requirements:
· Perl