Branch Coverage

blib/lib/Data/RandomPerson.pm
Criterion Covered Total %
branch 39 42 92.8


line true false branch
29 2 5 if (lc $key eq 'male') { }
2 3 elsif (lc $key eq 'female') { }
2 1 elsif (lc $key eq 'last') { }
0 1 elsif ($key eq 'type') { }
56 1 3 if $@
59 1 2 if $@
62 1 1 if $@
78 10 10 rand() < 0.5 ? :
92 10 10 if ($self->{'gender'} eq 'm') { }
94 8 2 if $self->{'age'} > 26
95 6 4 if $self->{'age'} > 34
96 6 4 if $self->{'age'} > 34
100 9 1 if $self->{'age'} > 16
101 9 1 if $self->{'age'} > 16
102 7 3 if $self->{'age'} > 26
103 7 3 if $self->{'age'} > 34
104 7 3 if $self->{'age'} > 34
123 10 10 $self->{'gender'} eq 'm' ? :
161 5 1 if ($backend =~ /::(\w+)Last$/)
162 0 5 unless $backends{'Data::RandomPerson::Names::' . $1 . 'Female'}
163 0 5 unless $backends{'Data::RandomPerson::Names::' . $1 . 'Male'}