| line |
true |
false |
branch |
|
22
|
75 |
28 |
if (defined $_[0] and ref $_[0] eq 'HASH') { } |
|
24
|
10 |
65 |
if (defined $argsref->{'underscores'} and $argsref->{'underscores'} == 0) |
|
28
|
14 |
61 |
if (defined $argsref->{'min'}) |
|
30
|
1 |
13 |
unless $argsref->{'min'} =~ /^\d+$/ |
|
32
|
1 |
12 |
unless $argsref->{'min'} >= 2 |
|
35
|
34 |
39 |
if (defined $argsref->{'max'}) |
|
37
|
1 |
33 |
unless $argsref->{'max'} =~ /^\d+$/ |
|
39
|
1 |
32 |
unless $argsref->{'max'} >= 3 |
|
42
|
24 |
47 |
if (defined $argsref->{'default'}) |
|
44
|
1 |
23 |
unless $argsref->{'default'} =~ /^\d+$/ |
|
47
|
4 |
66 |
if (defined $argsref->{'min'} and defined $argsref->{'max'}) |
|
50
|
2 |
2 |
if $argsref->{'min'} >= $argsref->{'max'} |
|
55
|
78 |
18 |
unless defined $length |
|
56
|
3 |
93 |
if $length < $MIN |
|
57
|
10 |
86 |
if $length > $MAX |
|
58
|
86 |
10 |
$scoresflag ? : |
|
65
|
0 |
96 |
if $forbidden{$varname} |