view release on metacpan or  search on metacpan

lib/Game/CharacterSheetGenerator/HumanNames.pm  view on Meta::CPAN

#!/usr/bin/env perl
# Copyright (C) 2012-2022  Alex Schroeder <alex@gnu.org>

# This program is free software: you can redistribute it and/or modify it under
# the terms of the GNU General Public License as published by the Free Software
# Foundation, either version 3 of the License, or (at your option) any later
# version.
#
# This program is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along with
# this program. If not, see <http://www.gnu.org/licenses/>.

=encoding utf8

=head1 NAME

Game::CharacterSheetGenerator::HumanName - return a human name

=head1 SYNOPSIS

    use Game::CharacterSheetGenerator::HumanName qw(human_name);
    # returns both $name and $gender (F, M, or ?)
    my ($name, $gender) = human_name();
    # returns the same name and its gender
    ($name, $gender) = human_name("Alex");

=head1 DESCRIPTION

This package has one function that returns a human name and a gender. The gender
returned is "M", "F", or "?".

If a name is provided, the gender is returned.

=cut

package Game::CharacterSheetGenerator::HumanNames;
use Modern::Perl;
use utf8;

require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(human_name);

sub one {
  my $i = int(rand(scalar @_));
  return $_[$i];
}

# http://www.stadt-zuerich.ch/content/prd/de/index/statistik/publikationsdatenbank/Vornamen-Verzeichnis/VVZ_2012.html

my @names = qw{Aadhya F Aaliyah F Aanya F Aarna F Aarusha F Abiha F Abira F
Abisana F Abishana F Abisheya F Ada F Adalia F Adelheid F Adelia F Adina F Adira
F Adisa F Adisha F Adriana F Adriane F Adrijana F Aela F Afriela F Agata F
Agatha F Aicha F Aikiko F Aiko F Aila F Ainara F Aischa F Aisha F Aissatou F
Aiyana F Aiza F Aji F Ajshe F Akksaraa F Aksha F Akshaya F Alaa F Alaya F Alea F
Aleeya F Alegria F Aleksandra F Alena F Alessandra F Alessia F Alexa F Alexandra
F Aleyda F Aleyna F Alia F Alice F Alicia F Aliena F Alienor F Aliénor F Alija F
Alina F Aline F Alisa F Alisha F Alissa F Alissia F Alix F Aliya F Aliyana F
Aliza F Alizée F Allegra F Allizza F Alma F Almira F Alva F Alva-Maria F Alya F
Alysha F Alyssa F Amalia F Amalya F Amanda F Amara F Amaris F Amber F Ambra F
Amea F Amelia F Amelie F Amélie F Amina F Amira F Amor F Amora F Amra F Amy F
Amy-Lou ? Ana F Anaahithaa F Anabell F Anabella F Anaëlle F Anaïs F Ananya F
Anastasia F Anastasija F Anastazia F Anaya F Andeline F Andjela F Andrea F
Anduena F Anela F Anesa F Angel ? Angela F Angelina F Angeline F Anik ? Anika F
Anila F Anisa F Anise F Anisha F Anja F Ann F Anna F Anna-Malee F Annabel F
Annabelle F Annalena F Anne F Anne-Sophie F Annica F Annicka F Annigna F Annik F
Annika F Anouk F Antonet F Antonia F Antonina F Anusha F Aralyn F Ariane F
Arianna F Ariel ? Ariela F Arina F Arisa F Arishmi F Arlinda F Arsema F Arwana F
Arwen F Arya F Ashley F Ashmi F Asmin F Astrid F Asya F Athena F Aubrey F Audrey
F Aurelia F Aurélie F Aurora F Ava F Avery F Avy F Aya F Ayana F Ayla F Ayleen F
Aylin F Ayse F Azahel F Azra F Barfin F Batoul F Batya F Beatrice F Belén F
Bella F Bente F Beril F Betel F Betelehim F Bleona F Bracha F Briana F Bronwyn F
Bruchi F Bruna F Büsra F Caelynn F Caitlin F Caja F Callista F Camille F Cao F
Carice F Carina F Carla F Carlotta F Carolina F Caroline F Cassandra F Castille
F Cataleya F Caterina F Catherine F Céleste F Celia F Celina F Celine F Ceylin F
Chana F Chanel F Chantal F Charielle F Charleen F Charlie ? Charlize F Charlott
F Charlotte F Charly F Chavi F Chaya F Chiara F Chiara-Maé F Chinyere F Chléa F
Chloe F Chloé F Ciara F Cilgia F Claire F
Clara F Claudia F Clea F Cleo F Cleofe F Clodagh F Cloé F Coco F Colette F Coral
F Coralie F Cyrielle F Daliah F Dalila F Dalilah F Dalina F Damiana F Damla F
Dana F Daniela F Daria F Darija F Dean ? Deborah F Déborah-Isabel F Defne F
Delaila F Delia F Delina F Derya F Deshira F Deva F Diana F Diara F Diarra F
Diesa F Dilara F Dina F Dinora F Djurdjina F Dominique F Donatella F Dora F
Dorina F Dunja F Eda F Edessa F Edith F Edna F Eduina F Eidi F Eileen F Ela F
Elanur F Elda F Eldana F Elea F Eleanor F Elena F Eleni F Elenor F Eleonor F
Eleonora F Elhana F Eliana F Elidiana F Eliel F Elif F Elin F Elina F Eline F
Elinor F Elisa F Elisabeth F Elise F Eliska F Eliza F Ella F Ellen F Elliana F
Elly F Elma F Elodie F Elona F Elora F Elsa F Elva F Elyssa F Emelie F Emi F
Emilia F Emiliana F Emilie F Émilie F Emilija F Emily F Emma F Enis F Enna F
Enrica F Enya F Erdina F Erika F Erin F Erina F Erisa F Erna F Erona F Erva F
Esma F Esmeralda F Estée F Esteline F Estelle F Ester F Esther F Eteri F
Euphrasie F Eva F Eve F Evelin F Eviana F Evita F Ewa F Eya F Fabia F Fabienne F
Fatima F Fatma F Fay F Faye F Fe F Fedora F Felia F Felizitas F Fiamma F Filipa
F Filippa F Filomena F Fina F Finja F Fiona F Fjolla F Flaminia F Flavia F Flor
F Flora F Florence F Florina F Florita F Flurina F Franca F Francesca F
Francisca F Franziska F Freija F Freya F Freyja F Frida F Gabriela F Gabrielle F
Gaia F Ganiesha F Gaon F Gavisgaa F Gemma F Georgina F Ghazia F Gia F Giada F