Branch Coverage

blib/lib/Data/ICal/Entry.pm
Criterion Covered Total %
branch 27 36 75.0


line true false branch
66 1 42 if ref $_ eq 'HASH'
67 0 43 if ref $_ eq 'ARRAY'
104 0 0 if (grep {$_ eq 'uid';} @mandatory and not defined $self->properties->{'uid'} and $self->auto_uid)
117 1 73 unless $self->properties->{$name} and @{$self->properties->{$name};}
124 8 299 if $a eq 'version'
125 10 289 if $b eq 'version'
240 0 362 unless defined $prop
242 4 358 unless ($self->is_property($prop) or $prop =~ /^x-/i)
246 265 97 if ($self->is_unique($prop))
252 327 35 unless ref $val eq 'ARRAY'
281 0 13 if (@_ % 2)
519 48 18 if (my $class = $_generic{lc $type}) { }
18 0 elsif (my $sub = $self->can('_parse_' . lc($type))) { }
564 0 5 unless exists $_action_map{$action}
569 0 5 if $@
584 0 48 if $@
604 189 8 if (not $parent->vcal10 and !($occurence->{'param'} && defined $occurence->{'param'}{'VALUE'}) || $occurence->{'param'}{'VALUE'} eq 'TEXT')
616 30 285 if ($occurence->{'param'}) { }