| line |
true |
false |
branch |
|
15
|
0 |
11 |
ref $_[0] ? : |
|
19
|
6 |
5 |
if (not defined $encoding) { } |
|
21
|
6 |
0 |
unless defined $method |
|
24
|
0 |
5 |
unless defined $method |
|
27
|
0 |
11 |
unless my $encoder = &Encode::find_encoding($encoding) |
|
67
|
2 |
107 |
if $word eq '' |
|
73
|
54 |
53 |
if ($word =~ /[\x80-\x{10ffff}]|(^=\?.*\?=\z)/s) { } |
|
|
40 |
13 |
elsif ($mode eq 'phrase') { } |
|
84
|
18 |
89 |
if $buffer ne '' and $buffer_type ne $word_type |
|
88
|
13 |
94 |
if ($word_type eq 'text') { } |
|
|
40 |
54 |
elsif ($word_type eq 'quoted') { } |
|
89
|
7 |
6 |
if $result ne '' |
|
93
|
13 |
27 |
if $buffer ne '' |
|
98
|
0 |
54 |
if $self->{'method'} eq 'B' |
|
101
|
28 |
26 |
if $buffer ne '' |
|
107
|
0 |
224 |
if ($self->{'method'} eq 'B') { } |
|
|
16 |
208 |
elsif ($char =~ /[()<>\@,;:\\".\[\]=?_]/) { } |
|
|
100 |
108 |
elsif ($char =~ /[\x80-\x{10ffff}]/) { } |
|
|
28 |
80 |
elsif ($char eq ' ') { } |
|
131
|
218 |
6 |
if (length($buffer) + length($chunk) <= $max_len) { } |
|
142
|
35 |
6 |
if $buffer ne '' |
|
151
|
24 |
35 |
if $$result ne '' |
|
153
|
27 |
32 |
if ($buffer_type eq 'quoted') { } |
|
|
32 |
0 |
elsif ($buffer_type eq 'mime') { } |
|
154
|
9 |
18 |
if ($$buffer =~ /[$rfc_specials]/) { } |
|
167
|
0 |
32 |
if ($self->{'method'} eq 'B') { } |