| Data-RandomPerson documentation | Contained in the Data-RandomPerson distribution. |
Data::RandomPerson::Names::JapaneseMale - A list of male names
This document refers to version 0.4 of Data::RandomPerson::Names::JapaneseMale, released Sept 13th, 2005
use Data::RandomPerson::Names::JapaneseMale; my $n = Data::RandomPerson::Names::JapaneseMale->new(); print $n->get();
Returns a random element from a list of male names culled from Chris Pound's language machines page at http://www.ruf.rice.edu/~pound/#scripts.
Create the Data::RandomPerson::Names::JapaneseMale object.
Returns a random name from the list.
Returns the size of the list
Perl 5
None
None so far
None
None
Peter Hickman (peterhi@ntlworld.com)
Copyright (c) 2005, Peter Hickman. All rights reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.
| Data-RandomPerson documentation | Contained in the Data-RandomPerson distribution. |
# $Id: JapaneseMale.pm,v 1.3 2005/05/22 17:02:29 peterhickman Exp $ package Data::RandomPerson::Names::JapaneseMale; use strict; use warnings; use base 'Data::RandomPerson::Names'; use Data::RandomPerson::Choice; sub new { my ($class) = @_; my $self = bless {}, $class; $self->{choice} = Data::RandomPerson::Choice->new(); $self->{choice}->add_list( qw/ agatamori akimitsu akira arinori azumabito bakin benkei buntaro chikafusa chikayo chomei chuemon dosan emishi emon fuhito fujifusa fujitaka fususaki gekkai gennai gidayu gongoro hakatoko hamanari haruhisa hideharu hideo hidetanda hideyoshi hirohito hirotsugu hitomaru iemitsu ienobu ieyasu ieyoshi imoko issai iwao iwazumi jikkyo jozen junkei jussai kageharu kagemasa kagemusha kahei kanemitsu katsumi katsuyori kazan kazunori keisuke kintaro kiyomori kiyosuke kmako komaro koremasa koreyasu kuronushi kyuso mabuchi maro masahide masamitsu michifusa mitsukane miyamoto mochiyo morinaga munetaka murashige nagafusa nagate nakahira nambo naoshige narihiro oguromaro okimoto okura omaro otondo razan rikyu rokuemon ryokai sadakata sanehira sanetomo sanzo saru shigenobu shigeuji shingen shoetsu shozen sukemasa tadabumi tadashiro takatoshi tameyori taneo taneyoshi tensui togama tomomasa toshifusa toyonari tsunayoshi tsunetane uchimaro ujihiro umakai watamaro yakamochi yasumori yoriie yoritomo yoshiie yoshisune yoshitane yoshizumi yukihira zuiken / ); return $self; } 1; __END__