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