line |
true |
false |
branch |
266
|
15 |
77 |
unless defined $tz
|
267
|
0 |
77 |
unless length $tz
|
270
|
24 |
53 |
unless 'DateTime::TimeZone'->is_valid_name($tz)
|
279
|
0 |
118 |
unless $str
|
282
|
10 |
108 |
if (ref $str) { }
|
|
42 |
66 |
elsif ($str =~ /$REGEXP_TIMESTAMP/) { }
|
290
|
0 |
118 |
if not $dt or $@
|
306
|
0 |
22 |
unless $datetime
|
312
|
0 |
12 |
unless defined $str
|
314
|
0 |
12 |
unless $datetime
|
321
|
0 |
21 |
unless $datetime
|
328
|
0 |
21 |
unless $datetime
|
335
|
0 |
21 |
unless $datetime
|
342
|
0 |
21 |
unless $datetime
|
349
|
1 |
3 |
unless defined $sec
|
360
|
1 |
2 |
if $days
|
361
|
0 |
3 |
$sec < 0 ? :
|
373
|
2 |
6 |
unless defined $str
|
374
|
2 |
4 |
unless length $str
|
389
|
2 |
2 |
unless defined $stream
|
400
|
0 |
31 |
unless $phone
|
404
|
0 |
31 |
unless 10 <= length $phone
|
408
|
17 |
14 |
unless $phone =~ /^\+/
|
415
|
0 |
24 |
unless $phone
|
419
|
0 |
24 |
unless $phone
|
432
|
0 |
8 |
unless $str
|
450
|
0 |
6 |
unless defined $str
|
451
|
0 |
6 |
unless defined $count
|
462
|
3 |
1 |
$tail >= 2 && $tail < 5 ? :
|
|
1 |
4 |
$tail == 1 ? :
|
|
1 |
5 |
$tail == 0 ? :
|
469
|
0 |
6 |
$tail >= 10 && $tail < 21 ? :
|
478
|
0 |
6 |
unless defined $count
|
484
|
3 |
1 |
$tail >= 2 && $tail < 5 ? :
|
|
1 |
4 |
$tail == 1 ? :
|
|
1 |
5 |
$tail == 0 ? :
|
491
|
0 |
6 |
$tail >= 10 && $tail < 21 ? :
|
500
|
1 |
3 |
unless defined $str
|
501
|
1 |
2 |
unless length $str
|
504
|
1 |
1 |
$length < length $str ? :
|