The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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

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);

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íč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

© Michal Josef Špaček 2013-2021

BSD 2-Clause License

VERSION

0.06