Encode::ShiftJIS2004 - shift_jis-2004 - JIS X 0213 Annex 1 encoding
use Encode::ShiftJIS2004;
use Encode qw/encode decode/;
$bytes = encode("shift_jis-2004", $utf8);
$utf8 = decode("shift_jis-2004", $bytes);
This module provides followng encoding for JIS X 0213:2004 Annex 1.
Canonical Alias Description
--------------------------------------------------------------
shift_jis-2004 qr/\bshift.*jis.*2004$/i shift encoding
--------------------------------------------------------------To find out how to use this module in detail, see Encode.
This encoding does not keep forward compatibility to ascii but keeps conformance to the standard, "\x5C" and "\x7E" are mapped from/to YEN SIGN and OVERLINE; REVERSE SOLIDUS and TILDE are mapped to/from multibyte sequences.
Hatuka*nezumi - IKEDA Soji <hatuka(at)nezumi.nu>
Copyright (C) 2013 Hatuka*nezumi - IKEDA Soji.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.