line |
true |
false |
branch |
117
|
1 |
6 |
unless my $file = shift() |
126
|
0 |
6 |
unless $pps |
151
|
8 |
2 |
if ($self->{'BODY_PLAIN'}) |
152
|
3 |
7 |
if ($self->{'BODY_HTML'}) |
153
|
5 |
5 |
if ($self->{'BODY_RTF'}) |
155
|
7 |
3 |
if (scalar @parts > 1) { } |
|
2 |
1 |
elsif (@parts == 1) { } |
171
|
2 |
8 |
if (@{$self->{'ATTACHMENTS'};} > 0) { } |
225
|
6 |
8 |
if ($name =~ /__recip_version1 0_ /) { } |
|
2 |
6 |
elsif ($name =~ /__attach_version1 0_ /) { } |
266
|
0 |
6 |
$self->{'EMBEDDED'} ? : |
278
|
7 |
7 |
unless (defined $self->{'OLEDATE'}) |
282
|
2 |
5 |
unless $datearr and $datearr->[0] |
283
|
5 |
2 |
if $datearr and $datearr->[0] |
297
|
6 |
5 |
unless my $submission_id = $self->{'SUBMISSION_ID'} |
298
|
0 |
5 |
unless $submission_id =~ / l=.*- (\d\d) (\d\d) (\d\d) (\d\d) (\d\d) (\d\d) Z-.* /x |
301
|
5 |
0 |
if $year < 20 |
320
|
35 |
75 |
if $value |
330
|
3 |
7 |
if ($address) |
331
|
3 |
0 |
if $result |
342
|
9 |
11 |
unless defined $names |
348
|
5 |
1 |
if ($addresstext) { } |
363
|
5 |
1 |
if ($name eq $address->name) |
374
|
15 |
3 |
unless ($part->content_type =~ m[ ^ multipart / ]x) |
387
|
5 |
7 |
if (defined $codepage) |
397
|
6 |
3 |
if ($charset ne 'UTF-8') |
445
|
5 |
0 |
if ($magic == $MAGIC_COMPRESSED_RTF) { } |
|
0 |
0 |
elsif ($magic == $MAGIC_UNCOMPRESSED_RTF) { } |
451
|
60 |
396 |
if (@flags == 0) |
455
|
195 |
261 |
if ($flag eq '0') { } |
463
|
0 |
261 |
if ($longoffset >= $buflen) |
492
|
3 |
8 |
unless defined $self->{'HEAD'} |