The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Lingua::JA::KanjiTable - User-Defined Character Properties for Joyo Kanji and Jinmeiyo Kanji

SYNOPSIS

use Lingua::JA::KanjiTable;
use utf8;

'亜'   =~ /^\p{InJoyoKanji}$/   ? 1 : 0; # => 1
'亞'   =~ /^\p{InJoyoKanji}$/   ? 1 : 0; # => 0
'匁'   =~ /^\p{InJoyoKanji}$/   ? 1 : 0; # => 0
'叱'   =~ /^\p{InJouyouKanji}$/ ? 1 : 0; # => 0
'𠮟'   =~ /^\p{InJouyouKanji}$/ ? 1 : 0; # => 1
'恍惚' =~ /^\p{InJoyoKanji}+$/  ? 1 : 0; # => 0
'固唾' =~ /^\p{Lingua::JA::KanjiTable::InJoyoKanji20101130}+$/ ? 1 : 0; # => 1

'亞' =~ /^\p{InJinmeiyoKanji}$/ ? 1 : 0; # => 1
'匁' =~ /^\p{InJinmeiyoKanji}$/ ? 1 : 0; # => 1
'柊' =~ /^\p{InJinmeiyoKanji}$/ ? 1 : 0; # => 1
'苺' =~ /^\p{InJinmeiyoKanji}$/ ? 1 : 0; # => 1
'姦' =~ /^\p{InJinmeiyoKanji}$/ ? 1 : 0; # => 0

#Jinmei(名) check:
'太郎喜左衛門将時能' =~ /^\p{InJinmei}+$/ ? 1 : 0; # => 1
'愛子エンジェル'     =~ /^\p{InJinmei}+$/ ? 1 : 0; # => 1
'み〜こ'             =~ /^\p{InJinmei}+$/ ? 1 : 0; # => 0
'ニャー'             =~ /^\p{InJinmei}+$/ ? 1 : 0; # => 1
'奈々'               =~ /^\p{InJinmei}+$/ ? 1 : 0; # => 1
'〆子'               =~ /^\p{InJinmei}+$/ ? 1 : 0; # => 0

sub InJinmei
{
    return <<"END";
+Lingua::JA::KanjiTable::InJoyoKanji
+Lingua::JA::KanjiTable::InJinmeiyoKanji
3005
3041\t3096
309D
309E
30A1\t30FA
30FC\t30FE
END
}

DESCRIPTION

Lingua::JA::KanjiTable provides user-defined character properties for 常用漢字表 and 人名用漢字表.

EXPORTS

By default Lingua::JA::KanjiTable exports the following user-defined character properties:

The following properties are not exported by default:

SEE ALSO

Jōyō kanji - Wikipedia, the free encyclopedia

常用漢字表(平成22年11月30日内閣告示)

Jinmeiyō kanji - Wikipedia, the free encyclopedia

人名用漢字表

戸籍法 第50条

戸籍法施行規則 第60条

LICENSE

Copyright (C) pawa.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

pawa pawa@pawafuru.com