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};}
120 6 284 if $a eq 'version'
125 10 274 if $b eq 'version'
240 0 361 unless defined $prop
242 4 357 unless ($self->is_property($prop) or $prop =~ /^x-/i)
246 264 97 if ($self->is_unique($prop))
252 326 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))) { }
563 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'}) { }