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); 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); 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); Recieves scalar with sex of the person ('male' or 'female'). Default value of $sex variable is 'male'. Returns scalar with generated 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テュト稿k # Holub # Horテ。k # Hrubテス # Hruナ。ka # Hテ。jek # Janda # Jelテュnek # Kadlec # Kolテ。ナ� # Koneト肱テス # Kopeckテス # Kovテ。ナ� # Kratochvテュl # Krejト催ュ # Krテ。l # Kuト稿ra # Kナ凖ュナセ # Liナ。ka # Mach # Malテス # Marek # Mareナ。 # Matouナ。ek # Maナ。ek # Moravec # Musil # Mテシller # Navrテ。til # Nguyen # Novotnテス # Novテ。k # Nト嬶ec # Pavlテュk # Pokornテス # Polテ。k # Pospテュナ。il # Prochテ。zka # Rナッナセiト耕a # Sedlテ。ト稿k # Soukup # Stanト嫐 # Svoboda # Sテスkora # Tichテス # Urban # Valenta # Vanト嫐 # Veselテス # Vlト稿k # Vテ。vra # Zeman # ト憩ch # ト憩rmテ。k # ト憩rnテス # ナ佚ュha # ナ�evト催ュk # ナ�imek # ナ�tト孅テ。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ト稿k <mailto:skim@cpan.org> <http://skim.cz> LICENSE AND COPYRIGHT ツゥ Michal Josef ナ�paト稿k 2013-2021 BSD 2-Clause License VERSION 0.06