| blib/lib/IPC/Manager/Client/UnixSocket.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 14 | 42.8 |
| line | true | false | branch |
|---|---|---|---|
| 31 | 0 | 4 | unless my $s = "IO::Socket::UNIX"->new("Type", 2, "Local", $path, "Blocking", 0) |
| 42 | 0 | 4 | unless unlink $self->{'path'} |
| 61 | 0 | 0 | @{$self->{'buffer'};} ? : |
| 88 | 0 | 13 | unless my $peer_id = $msg->to |
| 91 | 0 | 13 | unless my $sock = $self->peer_exists($peer_id) |
| 93 | 0 | 13 | unless my $s = ($self->{'socket_cache'}{$sock} //= "IO::Socket::UNIX"->new("Type", 2, "Peer", $sock)) |
| 98 | 0 | 13 | unless $s->send($self->{'serializer'}->serialize($msg) . "\n") |