| blib/lib/iCal/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 41 | 59 | 69.4 |
| line | l | !l | condition |
|---|---|---|---|
| 263 | 0 | 286 | push @dates, $date and next |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 140 | 31 | 4 | 8 | not $e{'allday'} and $end->day > $start->day |
| 161 | 0 | 65 | 2 | defined $set->count and $set->count == 0 |
| 264 | 0 | 0 | 0 | $@ and $type ne 'DTEND' |
| 340 | 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 | 34 | 52 | _param($event, 'DTSTART', 'VALUE') or !1 |
| 191 | 1 | 20 | $$alarm{'properties'}{'TRIGGER'}[0]{'param'}{'RELATED'} || 'START' |
| 228 | 6 | 64 | $days ||= 0 |
| 0 | 70 | $hours ||= 0 | |
| 64 | 6 | $minutes ||= 0 | |
| 304 | 453 | 312 | $$h{$i} ||= {} |
| 318 | 8 | 3 | delete $$day{$$event{'UID'}} || {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 38 | 29 | 2 | 0 | $params{'start'} || 'DateTime'->now->truncate('to', 'year') |
| 40 | 2 | 29 | 0 | $params{'end'} || $start->clone->add('months', $$self{'months'}) |
| 42 | 1 | 30 | 0 | $$self{'span'} ||= 'DateTime::Span'->new('start', $start, 'end', $end) |
| 80 | 3 | 31 | 0 | $props{'X-WR-TIMEZONE'} ||= $$self{'tz'}->name |
| 82 | 3 | 31 | 0 | $props{'X-WR-RELCALID'} ||= $$self{'_calid'} |
| 83 | 3 | 31 | 0 | $props{'X-WR-CALNAME'} ||= ref $file ? "Calendar $$self{'_calid'}" : fileparse($file, qr/\.\w+/) |
| 121 | 84 | 2 | 0 | $duration ||= 'DateTime::Duration'->new('days', $e{'allday'} ? 1 : 0) |
| 122 | 56 | 30 | 0 | $e{'DTEND'} ||= $start + $duration |
| 157 | 25 | 42 | 0 | $set ||= 'DateTime::Set'->from_datetimes('dates', [$start]) |