NAME Mock::Person::CZ - Generate random sets of Czech names. SYNOPSIS use Mock::Person::CZ qw(first_male first_female last_male last_female middle_male middle_female name name_female name_male); my $first_male = first_male(); my $first_female = first_female(); my $last_male = last_male(); my $last_female = last_female(); my $middle_male = middle_male(); my $middle_female = middle_female(); my $name = name($sex); my $name_female = name_female(); my $name_male = name_male(); DESCRIPTION Data for this module was found on these pages: Last names cz.wikipedia.org <http://cs.wikipedia.org/wiki/Seznam_nej%C4%8Detn%C4%9Bj%C5%A1%C3%AD ch_p%C5%99%C3%ADjmen%C3%AD_v_%C4%8Cesku> Middle names There's usually no distinction between a first and middle name in the Czech Republic. First names cz.wikipedia.org - male names <http://cs.wikipedia.org/wiki/Seznam_nej%C4%8Dast%C4%9Bj%C5%A1%C3%AD ch_mu%C5%BEsk%C3%BDch_jmen_v_%C4%8Cesk%C3%A9_republice>, cs.wikipedia.org - female names <http://cs.wikipedia.org/wiki/Seznam_nej%C4%8Dast%C4%9Bj%C5%A1%C3%AD ch_%C5%BEensk%C3%BDch_jmen_v_%C4%8Cesk%C3%A9_republice>. SUBROUTINES "first_male" my $first_male = first_male(); Returns random first name of male person. "first_female" my $first_female = first_female(); Returns random first name of female person. "last_male" my $last_male = last_male(); Returns random last name of male person. "last_female" my $last_female = last_female(); Returns random last name of female person. "middle_male" my $middle_male = middle_male(); Returns random middle name of male person. "middle_female" my $middle_female = middle_female(); Returns random middle name of female person. "name" my $name = name($sex); Construct random person name. If a $sex variable is specified, name could be male or female. Number of names is 2 or 3. What is created is defined by $STRICT_NUM_NAMES variable. See in "VARIABLES" section. Returns string. "name_female" my $name_female = name_female(); Construct Czech random female name. Number of names is 2 or 3. What is created is defined by $STRICT_NUM_NAMES variable. See in "VARIABLES" section. Returns string. "name_male" my $name_male = name_male(); Construct Czech random male name. Number of names is 2 or 3. What is created is defined by $STRICT_NUM_NAMES variable. See in "VARIABLES" section. Returns string. VARIABLES $STRICT_NUM_NAMES Variable which control number of generated names. Possible values: 0 - Random between 2 and 3 choice (default value). 2 - First and last name. 3 - First, middle and last name. EXAMPLE1 use strict; use warnings; use Encode qw(encode_utf8); use Mock::Person::CZ qw(name); # Error. print encode_utf8(name())."\n"; # Output like. # ��tefan Luk���� ��imek EXAMPLE2 use strict; use warnings; use Encode qw(encode_utf8); use Mock::Person::CZ; # Get all last male names. my @last_males = @Mock::Person::CZ::last_male; # Print out. print sort map { encode_utf8($_)."\n" } @last_males; # Output: # Barto�� # Bene�� # Bla��ek # Bl��ha # Bure�� # Dole��al # Dost��l # Du��ek # Dvo����k # Fiala # Havl����ek # Holub # Hor��k # Hrub�� # Hru��ka # H��jek # Janda # Jel��nek # Kadlec # Kol���� # Kone��n�� # Kopeck�� # Kov���� # Kratochv��l # Krej���� # Kr��l # Ku��era # K������ # Li��ka # Mach # Mal�� # Marek # Mare�� # Matou��ek # Ma��ek # Moravec # Musil # M��ller # Navr��til # Nguyen # Novotn�� # Nov��k # N��mec # Pavl��k # Pokorn�� # Pol��k # Posp����il # Proch��zka # R����i��ka # Sedl����ek # Soukup # Stan��k # Svoboda # S��kora # Tich�� # Urban # Valenta # Van��k # Vesel�� # Vl��ek # V��vra # Zeman # ��ech # ��erm��k # ��ern�� # ����ha # ��ev����k # ��imek # ��t��p��nek # ����astn�� DEPENDENCIES Exporter, Readonly. SEE ALSO Task::Mock::Person Install the Mock::Person modules. REPOSITORY <https://github.com/michal-josef-spacek/Mock-Person-CZ> AUTHOR Michal Josef ��pa��ek <mailto:skim@cpan.org> <http://skim.cz> LICENSE AND COPYRIGHT �� 2013-2023 Michal Josef ��pa��ek BSD 2-Clause License VERSION 0.07