Branch Coverage

blib/lib/Object/Remote/Logging.pm
Criterion Covered Total %
branch 13 30 43.3


line true false branch
18 17 128 unless ($DID_INIT)
24 102 256 if (grep(($_ eq $arg), @EXPORT_OK)) { }
65 0 3 if $_ eq ""
66 1 2 if ($_ eq '*') { }
1 1 elsif (s/^-//) { }
86 17 0 unless (defined $ENV{'OBJECT_REMOTE_LOG_FORWARDING'} and $ENV{'OBJECT_REMOTE_LOG_FORWARDING'} ne "")
90 0 17 if ($test_logging)
100 0 17 if (defined $Object::Remote::FatNode::REMOTE_NODE)
107 17 0 unless defined $level and $level ne ""
109 0 0 unless defined $format
110 0 0 unless defined $selections
123 0 0 unless defined $will_log
125 0 0 unless $will_log
128 0 0 if $remote_info->{'forwarded'}
139 0 0 if $ENV{'OBJECT_REMOTE_LOG_FORWARDING'}