line |
true |
false |
branch |
82
|
19 |
61 |
if exists $$args{'input'} |
108
|
100 |
42 |
unless shift() |
111
|
42 |
100 |
if exists $opts{'strict_checking'} |
115
|
42 |
100 |
if exists $opts{'checksum'} |
118
|
42 |
100 |
if exists $opts{'input'} |
121
|
1 |
141 |
unless $self->message_loaded |
125
|
126 |
15 |
$self->get_strict_checking ? : |
128
|
123 |
18 |
if (not $module or $module eq 'unpack') |
154
|
26 |
43 |
if (not ref $input) { } |
|
26 |
17 |
elsif (ref $input eq 'ARRAY') { } |
|
13 |
4 |
elsif (reftype $input eq 'GLOB') { } |
174
|
2 |
2 |
unless (blessed $input) |
178
|
1 |
1 |
if (overload::Method($input, '""')) { } |
|
0 |
1 |
elsif (overload::Method($input, '<>')) { } |
277
|
141 |
1 |
defined $self->get_header ? : |
290
|
104 |
18 |
if not $checksum or $checksum eq 'unpack' |
293
|
0 |
18 |
if $@ |
323
|
93 |
48 |
if (defined $headers{'message-id'}) { } |
328
|
154 |
38 |
unless exists $headers{$h} |
334
|
29 |
112 |
unless $extracted_headers |
357
|
21 |
105 |
if defined $body |