NAME

Data::RandomPerson::Names::ThaiMale - A list of male names

SYNOPSIS

use Data::RandomPerson::Names::ThaiMale;

my $n = Data::RandomPerson::Names::ThaiMale->new();

print $n->get();

DESCRIPTION

Overview

Returns a random element from a list of male names culled from Chris Pound's language machines page at http://generators.christopherpound.com/.

Constructors and initialization

new( )

Create the Data::RandomPerson::Names::ThaiMale object.

Class and object methods

get( )

Returns a random name from the list.

size( )

Returns the size of the list

AUTHOR

Peter Hickman (peterhi@ntlworld.com)

COPYRIGHT

Copyright (c) 2005, Peter Hickman. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.