line |
true |
false |
branch |
101
|
1 |
83 |
if (length $ssn != 9) |
111
|
29 |
54 |
if (in_array($ssn, $$self{'AD_SSN'})) |
123
|
9 |
45 |
if (not $$self{'BAD_COMBO_IGNORE'} and in_array($area . $group, $$self{'BAD_COMBO'})) |
128
|
6 |
39 |
if (not $self->valid_area($area)) { } |
|
6 |
33 |
elsif (not $self->valid_group($ssn)) { } |
|
1 |
32 |
elsif (not $self->valid_serial($serial)) { } |
149
|
0 |
155 |
if length $area > 3 |
151
|
135 |
20 |
exists $$self{'SSN'}{$area}{'valid'} ? : |
160
|
45 |
3 |
if (length $group > 2) |
163
|
3 |
42 |
if $group eq '00' |
165
|
1 |
41 |
if (not $$self{'BAD_COMBO_IGNORE'} and in_array($area . $group, $$self{'BAD_COMBO'})) |
170
|
36 |
5 |
if (defined $$self{'SSN'}{$area}{'highgroup'}) { } |
|
4 |
1 |
elsif (defined $$self{'SSN'}{$area}{'group_range'}) { } |
172
|
8 |
28 |
if ($$self{'BAD_COMBO_IGNORE'} and in_array($area . $group, $$self{'BAD_COMBO'})) |
187
|
1 |
2 |
$group eq '00' ? : |
193
|
1 |
32 |
$serial eq '0000' ? : |
201
|
87 |
10 |
if ($self->valid_area($area)) { } |
202
|
87 |
0 |
defined $$self{'SSN'}{$area}{'state'} ? : |
215
|
0 |
0 |
if ($self->valid_area($area)) { } |
229
|
28 |
1787 |
if (sprintf('%02d', $$self{'GROUP_ORDER'}[$i]) == sprintf('%02d', $highgroup)) |
244
|
74 |
4741 |
if $hay == $needle |
259
|
80 |
8360 |
unless /^[0-9]{3}/ |
261
|
7570 |
790 |
if (/^(\d{3}),(\d{2})\-*(\d*)\D*$/) |
262
|
7550 |
20 |
if (not defined $3 or $3 eq '') { } |
266
|
10 |
10 |
if (defined $by_ssn{$1}{'group_range'}) { } |
288
|
80 |
710 |
if $description =~ /not yet issued/i |
294
|
610 |
100 |
if (defined $max) { } |