| line |
true |
false |
branch |
|
104
|
13 |
0 |
if ($value) { } |
|
105
|
1 |
12 |
if ($value =~ /^([-+])?\d+$/) { } |
|
|
12 |
0 |
elsif ($value =~ /^(?:[\-\+])?P/) { } |
|
154
|
0 |
12 |
unless (defined $magic) |
|
159
|
3 |
9 |
defined $sign && $sign eq '-' ? : |
|
161
|
8 |
4 |
if (defined $weeks or defined $days) |
|
165
|
3 |
5 |
if (defined $hours or defined $mins or defined $secs) |
|
180
|
0 |
1 |
$secs < 0 ? : |
|
316
|
0 |
0 |
defined $self->nsecs || defined $self->ndays ? : |
|
390
|
13 |
4 |
if (my $ar_hms = $self->_hms) |
|
398
|
13 |
4 |
if (defined $ar_wd) |
|
401
|
6 |
7 |
if ($weeks and $days) { } |
|
|
1 |
6 |
elsif ($weeks) { } |
|
411
|
3 |
14 |
$$self{'sign'}{'value'} < 0 ? : |
|
418
|
13 |
4 |
!($value =~ /PT?$/) ? : |
|
431
|
0 |
4 |
unless (UNIVERSAL::isa($dur2, 'Net::ICal::Duration')) |
|
449
|
4 |
0 |
if (defined $dur1_totalsecs or defined $dur2_totalsecs) |
|
464
|
4 |
0 |
if (defined $ndays) { } |
|
|
0 |
0 |
elsif (defined $nsecs) { } |
|
465
|
0 |
4 |
$ndays < 0 ? : |
|
467
|
0 |
0 |
$nsecs < 0 ? : |
|
589
|
7 |
17 |
if (defined $ar_newval) |
|
597
|
20 |
4 |
if (defined $nsecs) { } |
|
620
|
8 |
17 |
if (defined $ar_newval) |
|
632
|
21 |
4 |
if (defined(my $ndays = $$self{'ndays'}{'value'})) { } |
|
658
|
0 |
0 |
if (defined $newval) { } |
|
659
|
0 |
0 |
unless defined $ar_cur |
|
667
|
0 |
0 |
defined $ar_cur ? : |