Branch Coverage

blib/lib/Protocol/DBus/Peer.pm
Criterion Covered Total %
branch 9 24 37.5


line true false branch
71 6 0 if ($msg)
72 2 4 if (my $serial = $msg->get_header("REPLY_SERIAL"))
75 2 0 if (my $cb = delete $_[0]{'_on_return'}{$serial})
93 0 0 if ($_[0]{'_io'}->get_write_queue_count)
158 0 2 if ($opts{'flags'} and grep {$_ eq 'NO_REPLY_EXPECTED';} @{$opts{'flags'};}) { }
177 2 0 if $serial
180 2 0 if ($ok and $response_expected)
195 2 0 if ($_[0]->get_type == 2) { }
307 0 0 if (@_ > 1)
311 0 0 $_[1] ? :
349 0 0 if ($^V lt v5.14)
448 0 4 if ($fds_ar and @$fds_ar and not $self->supports_unix_fd)