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