line |
true |
false |
branch |
109
|
15 |
7 |
if (defined $args{'filename'} or defined $args{'data'}) { } |
114
|
1 |
6 |
$self->vcal10 ? : |
119
|
0 |
7 |
if defined $args{'calname'} |
148
|
0 |
15 |
unless (defined $args{'filename'} or defined $args{'data'}) |
156
|
10 |
5 |
if (defined $args{'filename'}) { } |
158
|
1 |
9 |
unless open my $fh, '<', $args{'filename'} |
164
|
5 |
9 |
if $self->vcal10 |
168
|
0 |
14 |
if $@ |
171
|
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 |