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 常用漢字表 and 人名用漢字表

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:

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

  '太郎喜左衛門将時能' =~ /^\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:

InJoyoKanji - The latest Jouyou Kanji table(平成22年11月30日内閣告示第2号)
InJouyouKanji - ditto
InJinmeiyoKanji - The latest Jinmeiyou Kanji table(2010年11月30日版)
InJinmeiyouKanji - ditto

The followings are not exported by default:

InJoyoKanji20101130 - 常用漢字表(平成22年11月30日内閣告示第2号)
InJouyouKanji20101130 - ditto
InJinmeiyoKanji20101130 - 人名用漢字表(2010年11月30日版)
InJinmeiyouKanji20101130 - ditto

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>