Jcode::Nihongo (3)
Leading comments
Automatically generated by Pod::Man v1.37, Pod::Parser v1.32 Standard preamble: ========================================================================
Jcode -
use Jcode;
#
#
Jcode::convert($str, $ocode, $icode, "z");
#
print Jcode->new($str)->h2z->tr($from, $to)->utf8;
Jcode.pm
$iso_2022_jp = Jcode->new($str)->h2z->jis;
$iso_2022_jp = $str;
&jcode::convert(\$iso_2022_jp, 'jis', &jcode::getcode(\$str), "z");
Jcode.pm"getcode()" "convert()"
Perl5.8.1JcodePerl 5.8 Encode
Jcode
$j = Jcode->new($str [, $icode])
$strJcode$j$icode
getcode
Perl 5.8.1$icodeEncode
$j = Jcode->new($european, 'iso-latin1');
EUC "print $j->euc""print $j"
Jcode->new(\$str);
$str $strjcode"tie"
$j->set($str [, $icode])
$j$strJcode
# mailboxSJIS
my $jconv = new Jcode;
$/ = 00;
while(<>){
print $jconv->set(\$_)->mime_decode->sjis;
}
$j->append($str [, $icode]);
$j$str
$j = jcode($str [, $icode]);
Jcode->new()
$sjis = jcode($str)->sjis;
$j->encodedencoded
$sjis = $j->sjis
$euc = $j->euc
$jis = $j->jis
$sjis = $j->sjis
$ucs2 = $j->ucs2
$utf8 = $j->utf8
WYCIWYG = What you code is what you get :)
$iso_2022_jp = $j->iso_2022_jp
"$j->h2z->jis"
Perl 5.8.1Encode
$european = $j->iso_latin1; # '-''_'
Encode::Encoder
$j->fallback($fallback)
Perl 5.8.1JcodeUTF-8 ->encoding'?' Encode
my $unistr = "\x{262f}"; # .
Jcode::Nihongo(3pm) User Contributed Perl Documentation Jcode::Nihongo(3pm)
Jcode -
use Jcode;
#
#
Jcode::convert($str, $ocode, $icode, "z");
#
print Jcode->new($str)->h2z->tr($from, $to)->utf8;
Jcode.pm
$iso_2022_jp = Jcode->new($str)->h2z->jis;
$iso_2022_jp = $str;
&jcode::convert(\$iso_2022_jp, 'jis', &jcode::getcode(\$str), "z");
Jcode.pm"getcode()" "convert()"
Perl5.8.1JcodePerl 5.8 Encode
Jcode
$j = Jcode->new($str [, $icode])
$strJcode$j$icode
getcode
Perl 5.8.1$icodeEncode
$j = Jcode->new($european, 'iso-latin1');
EUC "print $j->euc""print $j"
Jcode->new(\$str);
$str $strjcode"tie"
$j->set($str [, $icode])
$j$strJcode
# mailboxSJIS
my $jconv = new Jcode;
$/ = 00;
while(<>){
print $jconv->set(\$_)->mime_decode->sjis;
}
$j->append($str [, $icode]);
$j$str
$j = jcode($str [, $icode]);
Jcode->new()
$sjis = jcode($str)->sjis;
$j->encodedencoded
$sjis = $j->sjis
$euc = $j->euc
$jis = $j->jis
$sjis = $j->sjis
$ucs2 = $j->ucs2
$utf8 = $j->utf8
WYCIWYG = What you code is what you get :)
$iso_2022_jp = $j->iso_2022_jp
"$j->h2z->jis"
Perl 5.8.1Encode
$european = $j->iso_latin1; # '-''_'
Encode::Encoder
$j->fallback($fallback)
Perl 5.8.1JcodeUTF-8 ->encoding'?' Encode
my $unistr = "\x{262f}"; # .