| line |
true |
false |
branch |
|
13
|
1 |
1 |
if scalar @_ != 1 |
|
23
|
1 |
14 |
unless scalar(@_) % 2 == 1 |
|
37
|
1 |
7 |
unless scalar(@_) % 2 == 1 |
|
71
|
4 |
10 |
if ($data{'span'}) |
|
72
|
2 |
2 |
unless $data{'start'} and $data{'end'} |
|
75
|
2 |
10 |
if ($data{'callback'}) |
|
76
|
1 |
1 |
unless ref $data{'callback'} eq 'CODE' |
|
87
|
1 |
12 |
if scalar @_ != 1 |
|
91
|
7 |
5 |
$$self{'_window_start'} ? : |
|
92
|
7 |
5 |
$$self{'_window_end'} ? : |
|
96
|
7 |
5 |
if ($$self{'_window_start'}) |
|
111
|
7 |
5 |
if ($$self{'_window_end'}) |
|
127
|
15 |
70 |
if ($$record{'start'} lt $start) { } |
|
|
56 |
14 |
elsif ($$record{'start'} lt $end) { } |
|
128
|
7 |
8 |
if ($$record{'end'} lt $start) { } |
|
|
3 |
5 |
elsif ($$record{'end'} lt $end) { } |
|
132
|
2 |
1 |
unless $$self{'_window_end_in'} |
|
135
|
4 |
1 |
unless $$self{'_window_span'} |
|
139
|
2 |
54 |
if ($$record{'end'} gt $end) |
|
140
|
1 |
1 |
unless $$self{'_window_start_in'} |
|
147
|
7 |
50 |
if ($$self{'_window_callback'}) |
|
148
|
3 |
4 |
unless &{$$self{'_window_callback'};}($record) |
|
151
|
2 |
52 |
if ($$record{'start'} lt $start) |
|
157
|
2 |
52 |
if ($$record{'end'} gt $end) |
|
178
|
8 |
0 |
unless $data{'group'} |
|
181
|
5 |
23 |
if ($todo and $$record{'start'} gt $data{'start'}) |
|
188
|
3 |
5 |
if $todo |
|
200
|
3 |
87 |
unless $validkeys{$key} |
|
204
|
44 |
11 |
if ($$data{$key}) |
|
205
|
1 |
43 |
if $$data{$key} eq 'present' |
|
206
|
7 |
37 |
unless $self->_date_valid($$data{$key}) |
|
210
|
14 |
9 |
if ($$data{'start'} and $$data{'end'}) |
|
211
|
1 |
13 |
if $$data{'start'} gt $$data{'end'} |
|
223
|
6 |
38 |
unless $month |
|
224
|
7 |
37 |
unless $day |
|
226
|
5 |
39 |
unless $year =~ /^\d+$/ |
|
227
|
1 |
38 |
unless $month =~ /^\d+$/ |
|
228
|
1 |
37 |
unless $day =~ /^\d+$/ |
|
233
|
0 |
37 |
unless $valid |
|
237
|
0 |
37 |
if ($time_part) |
|
240
|
0 |
0 |
unless 0 <= $hours and $hours <= 23 |
|
241
|
0 |
0 |
unless 0 <= $minutes and $minutes <= 59 |
|
242
|
0 |
0 |
unless 0 <= $seconds and $seconds <= 59 |
|
252
|
5 |
47 |
unless $$data{$key} |
|
279
|
14 |
2 |
if ($day) { } |
|
|
1 |
1 |
elsif ($month) { } |
|
292
|
0 |
16 |
if ($time_part) { } |