| line |
true |
false |
branch |
|
56
|
1 |
13 |
if (&none(sub {
$self->{'rc_sep'} eq $_;
}
, '', '/')) |
|
61
|
5 |
8 |
if (defined $self->{'serial'}) |
|
62
|
1 |
4 |
if (not $self->{'serial'} =~ /^\d+$/ms) { } |
|
|
1 |
3 |
elsif ($self->{'serial'} < 1) { } |
|
|
1 |
2 |
elsif ($self->{'serial'} > 999) { } |
|
72
|
1 |
9 |
if (defined $self->{'sex'} and &none(sub {
$self->{'sex'} eq $_;
}
, 'male', 'female')) |
|
79
|
3 |
6 |
if (defined $self->{'year'}) |
|
80
|
1 |
2 |
if ($self->{'year'} < $YEAR_FROM) { } |
|
|
1 |
1 |
elsif ($self->{'year'} > $YEAR_TO) { } |
|
114
|
10 |
7 |
unless (defined $sex) |
|
115
|
3 |
7 |
int rand 2 ? : |
|
120
|
14 |
3 |
if ($sex eq 'female') |
|
125
|
7 |
10 |
if ($self->{'alternate'}) |
|
134
|
16 |
1 |
unless (defined $serial) |
|
140
|
9 |
8 |
if ($date->year > 1954) |
|
157
|
1 |
8 |
if ($num_11 == 10) { } |