|
Lingua::ZH::ChineseNaming - Analyzing Chinese Names |
Lingua::ZH::ChineseNaming - Analyzing Chinese Names
use Lingua::ZH::ChineseNaming;
my $n = new Lingua::ZH::ChineseNaming( # Chen Yuan-yuan
FAMILY_NAME => '³―',
GIVEN_NAME => 'ΆκΆκ'
);
print Dumper $n;
Naming is an art and choosing an auspicious one is a long-standing tradition in Chinese communities. Many people hold firmly that to have a good name is to have an auspicious life.
Analyzing and choosing a good name always uses several patterns, e.g. stroke-counting, Chinese-horoscope, hexagrams, but there is never a scientific foundation for these patterns.
Lingua::ZH::ChineseNaming avoids to be a fortune-teller, but only extracts the computable part of this tradition and tries not to be confined to any specific school of interpreters.
my $n = new Lingua::ZH::ChineseNaming( # Chen Yuan-yuan
FAMILY_NAME => '³―',
GIVEN_NAME => 'ΆκΆκ'
);
then, it gives statistics like this.
FAMILY_NAME => '³―', # Chen
GIVEN_NAME => 'ΆκΆκ', # Yuan-yuan
heavenly => 12,
personal => 24
earthly => 26,
external => 14,
general => 38,
hexagram => 'gen over li',
chart => '---
- -
- -
---
- -
---'
Almost every kind of book on Chinese naming is written in Chinese. I list two books in English for you reference.
xern <xern@cpan.org>
This module is free software; you can redistribute it or modify it under the same terms as Perl itself.
|
Lingua::ZH::ChineseNaming - Analyzing Chinese Names |