| line |
true |
false |
branch |
|
139
|
0 |
557 |
if (ref $_[0]) { } |
|
148
|
7 |
550 |
if (defined $args{'epoch'}) { } |
|
|
548 |
2 |
elsif (defined $args{'ical'}) { } |
|
|
1 |
1 |
elsif (defined $args{'day'}) { } |
|
184
|
0 |
3 |
unless defined $args{$attrib} |
|
187
|
3 |
0 |
unless defined $args{$attrib} |
|
210
|
9 |
548 |
if (exists $args{'offset'}) { } |
|
|
14 |
534 |
elsif (not $zflag) { } |
|
213
|
1 |
8 |
if ($zflag and $args{'offset'} != 0) { } |
|
215
|
0 |
1 |
unless $ENV{'HARNESS_ACTIVE'} |
|
227
|
14 |
0 |
$tz eq $Date::ICal::localzone ? : |
|
228
|
14 |
0 |
if defined $self |
|
256
|
0 |
543 |
if (1 & @_) |
|
263
|
1 |
542 |
if (exists $args{'localtime'}) |
|
265
|
0 |
1 |
if exists $args{'offset'} |
|
271
|
1 |
542 |
if (exists $args{'offset'}) { } |
|
289
|
23 |
519 |
if ($self->hour or $self->min or $self->sec) { } |
|
328
|
1 |
6 |
if ($epoch = shift()) { } |
|
364
|
20 |
7 |
if ($offset eq '0') { } |
|
|
6 |
1 |
elsif ($offset =~ /^([+-])(\d\d)(\d\d)\z/) { } |
|
373
|
3 |
3 |
if $sign eq "-" |
|
398
|
13 |
12 |
if ($secoffset ne 0) |
|
403
|
8 |
5 |
unless $sign |
|
460
|
26 |
7 |
if (defined $offset) { } |
|
463
|
1 |
25 |
unless (defined $newoffset) |
|
469
|
2 |
23 |
if ($self->{'offset'}) { } |
|
476
|
2 |
0 |
if ($offsetdiff) { } |
|
489
|
5 |
2 |
if ($self->{'offset'}) { } |
|
553
|
0 |
561 |
unless @_ |
|
587
|
8 |
565 |
if ($unit eq 'duration') { } |
|
|
0 |
565 |
elsif ($unit eq 'eom_mode') { } |
|
594
|
10 |
14 |
$dur{$_} ? : |
|
598
|
0 |
0 |
if ($count eq 'wrap') { } |
|
|
0 |
0 |
elsif ($count eq 'limit') { } |
|
|
0 |
0 |
elsif ($count eq 'preserve') { } |
|
603
|
0 |
565 |
unless ($add = $Date::ICal::add_units{$unit}) |
|
608
|
0 |
565 |
unless defined $count |
|
611
|
21 |
544 |
if ($add->[0] == 0) { } |
|
|
43 |
501 |
elsif ($add->[0] == 1) { } |
|
619
|
0 |
501 |
if ($eom_mode == 2) { } |
|
629
|
0 |
501 |
if ($eom_mode and $d > 28) { } |
|
638
|
0 |
0 |
if $lastday > $d |
|
673
|
0 |
0 |
if (ref $two) { } |
|
698
|
3 |
1059 |
if ($_[1] < 0) { } |
|
739
|
14 |
42 |
defined $_ ? : |
|
741
|
0 |
8 |
unless (defined $magic) |
|
745
|
1 |
7 |
defined $sign && $sign eq '-' ? : |
|
789
|
0 |
7 |
if ($reversed) |
|
793
|
5 |
2 |
if (ref $date1 and ref $date2) { } |
|
|
2 |
0 |
elsif (ref $date1 and $dur = 'Date::ICal::Duration'->new('ical', $date2)) { } |
|
796
|
2 |
3 |
if (ref $date2 eq 'Date::ICal::Duration') { } |
|
864
|
0 |
13 |
unless (defined $otherdate) |
|
868
|
3 |
10 |
if ($self->{'julian'} < $otherdate->{'julian'}) { } |
|
|
3 |
7 |
elsif ($self->{'julian'} > $otherdate->{'julian'}) { } |
|
|
3 |
4 |
elsif ($self->{'julsec'} < $otherdate->{'julsec'}) { } |
|
|
3 |
1 |
elsif ($self->{'julsec'} > $otherdate->{'julsec'}) { } |
|
916
|
0 |
0 |
Date::Leapyear::isleap(shift()) ? : |
|
1018
|
1 |
232618 |
if ($d > 268435149) { } |
|
|
115210 |
117408 |
elsif (($d += 306) <= 0) { } |
|
1039
|
39305 |
193314 |
if $m > 12 |
|
1062
|
38722 |
192779 |
if ($m <= 2) { } |
|
|
400 |
192379 |
elsif ($m > 14) { } |
|
1072
|
115214 |
116287 |
if ($y < 0) |
|
1227
|
0 |
0 |
if (my $jd = shift()) |