| line |
true |
false |
branch |
|
29
|
3 |
12 |
if ref $arg and ref $arg ne 'HASH'
|
|
39
|
1 |
10 |
if $key eq 'add'
|
|
41
|
9 |
1 |
if (my $method = $self->can($key))
|
|
58
|
1 |
5 |
if ref $start_date ne 'DateTime'
|
|
83
|
1 |
8 |
if ref $skip_dates
|
|
90
|
7 |
20 |
if $line =~ /^\s*$/
|
|
96
|
3 |
17 |
if ($line =~ /^RRULE:/i) { }
|
|
|
5 |
12 |
elsif (any sub {
/$line/;
}
, @known_holidays) { }
|
|
112
|
7 |
5 |
if ($@)
|
|
148
|
4 |
8 |
wantarray ? :
|
|
158
|
0 |
6 |
if $x < 0
|
|
162
|
0 |
6 |
unless exists $$self{'start_date'}
|
|
166
|
0 |
6 |
unless exists $$self{'days_to_skip'}
|
|
187
|
4 |
4 |
if $new_count == $count
|
|
193
|
6 |
0 |
wantarray ? :
|