Branch Coverage

blib/lib/Event/RPC/Server.pm
Criterion Covered Total %
branch 0 58 0.0


line true false branch
105 0 0 unless (exists $par{'load_modules'})
109 0 0 unless ($loop)
113 0 0 if ($@) { }
121 0 0 unless $loop
170 0 0 if $rpc_socket
181 0 0 $host ? :
189 0 0 if ($self->get_ssl) { }
191 0 0 if $@
192 0 0 unless $self->get_ssl_key_file
193 0 0 unless $self->get_ssl_cert_file
206 0 0 $ssl_opts ? :
0 0 unless $rpc_socket = 'IO::Socket::SSL'->new('Listen', 128, @LocalHost, 'LocalPort', $port, 'Proto', 'tcp', 'ReuseAddr', 1, 'SSL_key_file', $self->get_ssl_key_file, 'SSL_cert_file', $self->get_ssl_cert_file, 'SSL_passwd_cb', $self->get_ssl_passwd_cb, $ssl_opts ? %{$ssl_opts;} : ())
210 0 0 unless $rpc_socket = 'IO::Socket::INET'->new('Listen', 128, @LocalHost, 'LocalPort', $port, 'Proto', 'tcp', 'ReuseAddr', 1)
228 0 0 if ($self->get_ssl) { }
235 0 0 if ($self->get_start_log_listener)
236 0 0 unless my $log_socket = 'IO::Socket::INET'->new('Listen', 128, 'LocalPort', $port + 1, @LocalHost, 'Proto', 'tcp', 'ReuseAddr', 1)
265 0 0 unless $self->get_auth_required
266 0 0 if $self->get_auth_module
282 0 0 unless $self->get_listeners_started
315 0 0 if ($classes->{$class}{$method} eq '_singleton')
332 0 0 unless my $client_socket = $rpc_socket->accept
345 0 0 unless my $client_socket = $log_socket->accept
352 0 0 if $self->get_logger
372 0 0 unless $logger
383 0 0 unless ($$objects{"$object"})
402 0 0 if ($$objects{"$object"}) { }
424 0 0 unless ($$objects{"$object"})
432 0 0 if ($self->get_singleton_classes->{$class})
440 0 0 if $refcount == 0