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

Middle names

There's usually no distinction between a first and middle name in the Czech Republic.

First names

cz.wikipedia.org - male names, cs.wikipedia.org - female names.

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

cpanm Mock::Person::CZ

perl -MCPAN -e shell
install Mock::Person::CZ