Branch Coverage

blib/lib/PLS/Server.pm
Criterion Covered Total %
branch 33 46 71.7


line true false branch
64 0 24 if $eof
66 24 0 unless ($size)
68 24 0 if (${$buffref;} =~ s/^(.*?)\r\n\r\n//s) { }
74 1 23 unless $size
82 0 23 if length ${$buffref;} < $size
99 7 0 if $^O ne "MSWin32"
104 6 0 length $exit_code ? :
111 19 4 if (length $message->{'method'}) { }
115 2 17 if (builtin::blessed($message) and $message->isa("PLS::Server::Response"))
126 0 21 unless builtin::blessed($message)
128 17 4 if ($message->isa("PLS::Server::Request"))
132 4 17 if ($message->isa("PLS::Server::Response"))
144 0 30 unless builtin::blessed($request)
146 28 2 if ($request->isa('PLS::Server::Request')) { }
2 0 elsif ($request->isa('Future')) { }
167 0 38 unless builtin::blessed($message) and $message->isa("PLS::Server::Message")
181 7 10 if (builtin::blessed($response))
183 6 1 if ($response->isa('PLS::Server::Response')) { }
1 0 elsif ($response->isa('Future')) { }
189 1 0 if length $request->{'id'}
213 4 0 if (builtin::blessed($request) and $request->isa("PLS::Server::Request"))
225 14 15 if ($request->{'notification'}) { }
235 15 14 if length $request->{'id'}