line |
true |
false |
branch |
20
|
4 |
19 |
if ref $input or not $input =~ /^(1|true|t|yes|y|0|false|f|no|n|)$/i |
26
|
5 |
11 |
if ref $input or not $input =~ /^[+-]?\d+(:?\.\d*)?$/ |
32
|
58 |
3934 |
if ref $input or not $input =~ /^[+-]?\d+$/ |
39
|
13 |
7 |
if ref $input or $input <= 0 |
46
|
9 |
5 |
if ref $input or $input >= 0 |
63
|
16 |
2 |
if ref $input or not 'Email::Valid'->address($input) |
72
|
2174 |
1031 |
if ref $input or $input < 1970 or $input > 3000 |
84
|
205 |
53 |
if ref $input or $input < 1 or $input > 53 |
96
|
205 |
12 |
if ref $input or $input < 1 or $input > 12 |
108
|
205 |
31 |
if ref $input or $input < 1 or $input > 31 |
118
|
34 |
7068 |
if ref $input or not $input =~ /^(\d{4})-(\d{2})-(\d{2})$/ or $1 < 1970 or $1 > 3000 or $2 < 1 or $2 > 12 or $3 < 1 or $3 > 31 |
132
|
34 |
43896 |
if ref $input or not $input =~ m[^(\d\d?)/(\d\d?)/(\d\d(?:\d\d)?)$] or $1 < 1 or $1 > 12 or $2 < 1 or $2 > 31 or not $3 > 0 && $3 < 100 || $3 >= 1970 && $3 <= 3000 |
145
|
16 |
86400 |
if ref $input or not $input =~ /^(\d\d):(\d\d):(\d\d)$/ or $1 > 23 or $2 > 59 or $3 > 59 |
152
|
15 |
1440 |
if ref $input or not $input =~ /^(\d\d):(\d\d)$/ or $1 > 23 or $2 > 59 |
161
|
18 |
14 |
if ref $input or not $input =~ /^\d+(:?\.\d*)?$/ |