| line |
true |
false |
branch |
|
36
|
60 |
0 |
unless (exists $$self{'level'} and defined $$self{'level'}) |
|
37
|
60 |
0 |
unless (exists $$self{'xml_indent'} and defined $$self{'xml_indent'}) |
|
38
|
60 |
0 |
unless (exists $$self{'encoding'} and defined $$self{'encoding'}) |
|
39
|
60 |
0 |
unless (exists $$self{'format_header'} and defined $$self{'format_header'}) |
|
40
|
60 |
0 |
unless (exists $$self{'format_transport'} and defined $$self{'format_transport'}) |
|
41
|
60 |
0 |
unless (exists $$self{'format_protocol'} and defined $$self{'format_protocol'}) |
|
42
|
60 |
0 |
unless (exists $$self{'sanitize_data'} and defined $$self{'sanitize_data'}) |
|
51
|
60 |
0 |
if (defined $level) |
|
53
|
0 |
60 |
if (exists $LEVELS{$level}) |
|
54
|
0 |
60 |
if (not $level =~ /^\d+$/ or $level > 7) |
|
76
|
0 |
0 |
unless (ref $data and exists $$self{'format_' . $type}) |
|
80
|
0 |
0 |
if ($ref) |
|
82
|
0 |
0 |
if ($ref eq 'Net::DRI::Data::Raw') { } |
|
87
|
0 |
0 |
unless ($msg->can('as_string')) |
|
93
|
0 |
0 |
if (not length $ct and substr($msg, 0, 5) eq '
|
|
95
|
0 |
0 |
if ($ct eq 'xml') |
|
97
|
0 |
0 |
if ($$self{'xml_indent'}) { } |
|
109
|
0 |
0 |
defined $$data{$_} ? : |
|
110
|
0 |
0 |
$$data{'direction'} eq 'in' ? : |
|
|
0 |
0 |
if (exists $$data{'direction'}) |
|
116
|
0 |
0 |
unless $$data{lc $1} |
|
133
|
0 |
0 |
$LEVELS{$level} >= $$self{'level'} ? : |