| line |
true |
false |
branch |
|
15
|
14 |
192 |
unless defined $value |
|
16
|
14 |
178 |
if $value eq '' |
|
18
|
6 |
172 |
unless $options |
|
20
|
16 |
156 |
unless $options->{'x-policy'} |
|
21
|
32 |
140 |
unless %policy |
|
25
|
90 |
50 |
if ($policy{'length'} and $policy{'length'} =~ /,/) { } |
|
|
36 |
14 |
elsif ($policy{'length'}) { } |
|
29
|
24 |
66 |
if (defined $min and length $value < $min) |
|
33
|
12 |
78 |
if (defined $max and length $value > $max) |
|
43
|
57 |
83 |
unless $return |
|
45
|
6 |
77 |
if (defined $policy{'chars'} and not ref $policy{'chars'}) |
|
50
|
48 |
35 |
unless $policy{'chars'} |
|
52
|
30 |
13 |
$value =~ /$re/ ? : |
|
55
|
13 |
30 |
unless $return |
|
58
|
13 |
70 |
unless $return |
|
60
|
9 |
61 |
if (defined $policy{'chars_blacklist'} and not ref $policy{'chars_blacklist'}) |
|
65
|
52 |
18 |
unless $policy{'chars_blacklist'} |
|
67
|
6 |
12 |
$value =~ /$re/ ? : |
|
70
|
6 |
12 |
unless $return |
|
73
|
6 |
64 |
unless $return |