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
- 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
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
LICENSE AND COPYRIGHT
© 2013-2023 Michal Josef Špaček
BSD 2-Clause License
VERSION
0.07