| line |
true |
false |
branch |
|
86
|
0 |
0 |
if (defined $args{'Longitude'}) |
|
90
|
0 |
0 |
if (defined $args{'Latitude'}) |
|
95
|
0 |
0 |
if (defined $args{'Month'}) { } |
|
103
|
0 |
0 |
if (defined $args{'Year'}) { } |
|
118
|
0 |
0 |
if $self->can('SUPER::DESTROY') |
|
140
|
0 |
0 |
if ($self->isvalid_month($month)) { } |
|
157
|
0 |
0 |
if ($self->isvalid_longitude) |
|
158
|
0 |
0 |
if ($self->isvalid_longitude($longitude)) { } |
|
174
|
0 |
0 |
if ($self->isvalid_latitude($latitude)) { } |
|
189
|
0 |
0 |
if ($year >= 1 and $year <= 9999) |
|
203
|
0 |
0 |
if ($month eq '') |
|
207
|
0 |
0 |
if ($month >= 1 and $month <= 12) |
|
223
|
0 |
0 |
if (abs $latitude > 90) |
|
239
|
0 |
0 |
if ($$self{'longitude'} > 187.5) |
|
242
|
0 |
0 |
if ($$self{'longitude'} < -187.5) |
|
245
|
0 |
0 |
if (abs $$self{'longitude'} > 187.5) |
|
263
|
0 |
0 |
if ($MONTH == 2 and $self->QLEAPY($$self{'year'})) |
|
286
|
0 |
0 |
if ($DUSK >= 999999) { } |
|
|
0 |
0 |
elsif ($DUSK <= -999999) { } |
|
343
|
0 |
0 |
if $@ |
|
386
|
0 |
0 |
if (not defined $$self{'data'}{'day'}{$ym . '-01'}{'data'}{'srinc'}) { } |
|
394
|
0 |
0 |
if ($month == 2 and $self->QLEAPY($year)) |
|
397
|
0 |
0 |
if (not defined $$self{'data'}{'day'}{$ym . '-' . $DATMAX}{'data'}{'srinc'}) { } |
|
419
|
0 |
0 |
unless (defined $$self{'data'}{'day'}{$ymd}{'data'}{'srinc'}) |
|
817
|
0 |
0 |
if ($SUNLON > $$self{'CONSTANTS'}{'TWOPI'} / 2) |
|
828
|
0 |
0 |
if ($EQTIME > $$self{'CONSTANTS'}{'TWOPI'} / 2) |
|
859
|
0 |
0 |
if ($SJSD + $RSmEzM + $CJCD <= 0) |
|
865
|
0 |
0 |
if ($SJSD + $RSmEzM - $CJCD >= 0) |
|
917
|
0 |
0 |
if ($N1CENT > 0) { } |
|
920
|
0 |
0 |
if ($N4YEAR > 0) { } |
|
923
|
0 |
0 |
if ($N1YEAR > 0) { } |
|
949
|
0 |
0 |
if ($N1YEAR > 0) { } |
|
1081
|
0 |
0 |
unless ($year % 4) |
|
1082
|
0 |
0 |
if ($year % 100) { } |
|
1085
|
0 |
0 |
unless ($year % 400) |
|
1134
|
0 |
0 |
if ($SJSD + $CJCD <= 0) |
|
1142
|
0 |
0 |
if ($SJSD - $CJCD >= 0) |
|
1191
|
0 |
0 |
if ($a - $b >= 0.5) |