line |
true |
false |
branch |
15
|
73 |
7 |
if (defined $s and length $s > 0) |
24
|
3 |
109 |
unless $s |
30
|
9 |
48 |
unless $s |
36
|
0 |
0 |
unless $s |
42
|
0 |
14 |
unless $s |
43
|
7 |
7 |
unless $s =~ /^\d+\.\d+$|^-\d+\.\d+$/ |
48
|
0 |
0 |
unless $s |
54
|
0 |
9 |
unless $s |
55
|
3 |
6 |
unless $s =~ m[^\d{4}(?:-|/)\d{2}(?:-|/)\d{2} \d{2}(?::|-)\d{2}(?::|-)\d{2}$] |
59
|
5 |
1 |
if ($@) |
64
|
4 |
2 |
if ($@) |
69
|
3 |
3 |
if ($@) |
79
|
0 |
5 |
unless $s |
83
|
3 |
2 |
if ($@) |
88
|
1 |
4 |
if ($@) |
93
|
1 |
4 |
if ($@) |
103
|
0 |
5 |
unless $s |
109
|
2 |
9 |
unless $s |
116
|
5 |
4 |
if ($len == 0 or $len >= $min and $len <= $max) { } |
129
|
1 |
2 |
if (length $integer_value <= $integer and length $decimal_value <= $decimal) { } |
138
|
10 |
7 |
if ($s >= $min and $s <= $max) { } |
147
|
0 |
7 |
unless $s |