blib/lib/iCal/Parser.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 43 | 62 | 69.3 |
line | l | !l | condition |
---|---|---|---|
267 | 0 | 294 | push @dates, $date and next |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
139 | 31 | 7 | 9 | not $e{'allday'} and ($end->ymd cmp $start->ymd) > 0 |
161 | 0 | 68 | 2 | defined $set->count and $set->count == 0 |
268 | 0 | 0 | 0 | $@ and $type ne 'DTEND' |
344 | 0 | 0 | 2 | $d >= $min and $d <= $max |
line | l | !l | condition |
---|---|---|---|
53 | 32 | 0 | 'IO::File'->new($file, 'r') || die("Can't open $file, $!") |
94 | 7 | 3 | $t->{'PRIORITY'} ||= 99 |
115 | 35 | 55 | _param($event, 'DTSTART', 'VALUE') || '' |
191 | 1 | 20 | $alarm->{'properties'}{'TRIGGER'}[0]{'param'}{'RELATED'} || 'START' |
228 | 7 | 69 | $days ||= 0 |
0 | 76 | $hours ||= 0 | |
70 | 6 | $minutes ||= 0 | |
308 | 453 | 324 | $h->{$i} ||= {} |
322 | 8 | 3 | delete $$day{$event->{'UID'}} || {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
38 | 33 | 2 | 0 | $params{'start'} || 'DateTime'->now->truncate('to', 'year') |
40 | 6 | 29 | 0 | $params{'end'} || $start->clone->add('months', $self->{'months'}) |
42 | 1 | 34 | 0 | $self->{'span'} ||= 'DateTime::Span'->new('start', $start, 'end', $end) |
80 | 3 | 35 | 0 | $props{'X-WR-TIMEZONE'} ||= $self->{'tz'}->name |
82 | 3 | 35 | 0 | $props{'X-WR-RELCALID'} ||= $self->{'_calid'} |
83 | 3 | 35 | 0 | $props{'X-WR-CALNAME'} ||= ref $file ? "Calendar $self->{'_calid'}" : fileparse($file, qr/\.\w+/) |
121 | 88 | 2 | 0 | $duration ||= 'DateTime::Duration'->new('days', $e{'allday'} ? 1 : 0) |
122 | 60 | 30 | 0 | $e{'DTEND'} ||= $start + $duration |
157 | 25 | 45 | 0 | $set ||= 'DateTime::Set'->from_datetimes('dates', [$start]) |
239 | 295 | 0 | 542 | $TYPES{'dates'}{$type} or $TYPES{'durations'}{$type} |