Branch Coverage

blib/lib/Data/ICal.pm
Criterion Covered Total %
branch 30 34 88.2


line true false branch
109 15 7 if (defined $args{'filename'} or defined $args{'data'}) { }
114 1 6 $self->vcal10 ? :
118 0 7 if defined $args{'calname'}
148 0 15 unless (defined $args{'filename'} or defined $args{'data'})
156 10 5 if (defined $args{'filename'}) { }
157 1 9 unless open my $fh, '<', $args{'filename'}
164 5 9 if $self->vcal10
168 0 14 if $@
170 1 13 unless $cal and exists $$cal{'objects'}
179 12 1 $version_ref ? :
180 1 12 unless (defined $version)
184 2 10 if ($version eq '1.0' and not $self->vcal10 or $version eq '2.0' and $self->vcal10)
187 1 1 $self->vcal10 ? :
267 4 173 if (not $in_qp and $line =~ /^[^:]+;ENCODING=QUOTED-PRINTABLE/i)
271 166 11 unless ($in_qp)
276 7 4 if ($line =~ s/=$//) { }
278 7 0 if @in_lines