line |
true |
false |
branch |
158
|
0 |
1 |
unless $datetime |
164
|
0 |
1 |
unless defined $str |
166
|
0 |
1 |
unless $datetime |
173
|
0 |
2 |
unless $datetime |
180
|
0 |
2 |
unless $datetime |
187
|
0 |
2 |
unless $datetime |
195
|
2 |
1 |
unless defined $str and length $str |
208
|
0 |
2 |
unless $str |
227
|
0 |
6 |
unless defined $str |
228
|
0 |
6 |
unless defined $count |
239
|
3 |
1 |
$tail >= 2 && $tail < 5 ? : |
|
1 |
4 |
$tail == 1 ? : |
|
1 |
5 |
$tail == 0 ? : |
246
|
0 |
6 |
$tail >= 10 && $tail < 21 ? : |
274
|
0 |
4 |
unless $phone |
278
|
0 |
4 |
if 7 == length $_ |
280
|
0 |
4 |
unless 10 <= length $phone |
282
|
0 |
4 |
if (11 == length $_) { } |
|
4 |
0 |
elsif (10 == length $_) { } |
302
|
0 |
3 |
unless $phone |
316
|
0 |
8 |
unless $str |
321
|
3 |
5 |
if ($str =~ /^\d+$/) { } |
327
|
0 |
8 |
if not $dt or $@ |