| line |
true |
false |
branch |
|
43
|
0 |
0 |
if $inx < @events |
|
62
|
0 |
0 |
if exists $accessor{$name} |
|
71
|
1177 |
1484 |
if (my $code = $accessor{$name}) { } |
|
77
|
2645 |
16 |
unless wantarray |
|
90
|
0 |
10 |
$self->get('elongation_in_longitude') ? : |
|
99
|
53 |
77 |
$self->__longitude_from_sun($time) > 0 ? : |
|
103
|
29 |
37 |
$self->$elong_method($time) < $self->$elong_method($time - 1) ? : |
|
108
|
24 |
34 |
$self->__longitude_from_sun($time) < 0 ? : |
|
112
|
25 |
30 |
$self->$elong_method($time) > $self->$elong_method($time - 1) ? : |
|
117
|
0 |
10 |
if (defined $opt{'checker_result'}) |
|
122
|
2 |
8 |
if (defined $quarter) { } |
|
131
|
0 |
8 |
unless my(@chk) = grep({not &$_($time);} @checker) |
|
137
|
8 |
40 |
if $rslt = &$c($time) |
|
150
|
0 |
10 |
unless wantarray |
|
182
|
12 |
22 |
if (my $code = $mutator{$name}) { } |