File Coverage

blib/lib/Data/RandomPerson/Names/EnglishMale.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Data::RandomPerson::Names::EnglishMale;
2              
3 1     1   661 use strict;
  1         2  
  1         23  
4 1     1   3 use warnings;
  1         1  
  1         20  
5              
6 1     1   4 use base 'Data::RandomPerson::Names';
  1         1  
  1         63  
7              
8             1;
9              
10             =pod
11              
12             =head1 NAME
13              
14             Data::RandomPerson::Names::EnglishMale - A list of male names
15              
16             =head1 SYNOPSIS
17              
18             use Data::RandomPerson::Names::EnglishMale;
19              
20             my $n = Data::RandomPerson::Names::EnglishMale->new();
21              
22             print $n->get();
23              
24             =head1 DESCRIPTION
25              
26             =head2 Overview
27              
28             Returns a random element from a list of male names culled from Chris Pound's language machines
29             page at L.
30              
31             =head2 Constructors and initialization
32              
33             =over 4
34              
35             =item new( )
36              
37             Create the Data::RandomPerson::Names::EnglishMale object.
38              
39             =back
40              
41             =head2 Class and object methods
42              
43             =over 4
44              
45             =item get( )
46              
47             Returns a random name from the list.
48              
49             =item size( )
50              
51             Returns the size of the list
52              
53             =back
54              
55             =head1 AUTHOR
56              
57             Peter Hickman (peterhi@ntlworld.com)
58              
59             =head1 COPYRIGHT
60              
61             Copyright (c) 2005, Peter Hickman. This module is
62             free software. It may be used, redistributed and/or modified under the
63             same terms as Perl itself.
64              
65             =cut
66