line |
true |
false |
branch |
81
|
0 |
0 |
if ($server ne '' and $host eq '') |
109
|
0 |
0 |
if $self->get_connected |
116
|
0 |
0 |
if ($ssl) |
118
|
0 |
0 |
if $@ |
122
|
0 |
0 |
if ($ssl) { } |
124
|
0 |
0 |
if ($self->get_ssl_ca_file or $self->get_ssl_ca_path) { } |
146
|
0 |
0 |
$ssl_opts ? : |
|
0 |
0 |
unless $sock = 'IO::Socket::SSL'->new('Proto', 'tcp', 'PeerPort', $port, 'PeerAddr', $server, 'Type', 1, 'Timeout', $timeout, @verify_opts, $ssl_opts ? %{$ssl_opts;} : ()) |
151
|
0 |
0 |
unless $sock = 'IO::Socket::INET'->new('Proto', 'tcp', 'PeerPort', $port, 'PeerAddr', $server, 'Type', 1, 'Timeout', $timeout) |
170
|
0 |
0 |
if ($auth_user) |
177
|
0 |
0 |
unless ($rc->{'ok'}) |
183
|
0 |
0 |
if (not $self->get_classes) { } |
200
|
0 |
0 |
unless my $sock = 'IO::Socket::INET'->new('Proto', 'tcp', 'PeerPort', $port, 'PeerAddr', $server, 'Type', 1) |
214
|
0 |
0 |
if $self->get_sock |
230
|
0 |
0 |
if ($error_cb) { } |
248
|
0 |
0 |
if ($rc->{'version'} ne $self->get_client_version) |
254
|
0 |
0 |
if ($rc->{'protocol'} < $self->get_client_protocol) |
287
|
0 |
0 |
unless $classes{$class} |
301
|
0 |
0 |
if $classes{$class} |
312
|
0 |
0 |
if $loaded_classes->{$class} |
324
|
0 |
0 |
unless $self->get_connected |
339
|
0 |
0 |
if ($method_type eq '_constructor') { } |
|
0 |
0 |
elsif ($method_type eq '1') { } |
366
|
0 |
0 |
unless $rc |
368
|
0 |
0 |
if wantarray |
384
|
0 |
0 |
unless $rc |
388
|
0 |
0 |
if (ref $val eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $val eq 'HASH') { } |
|
0 |
0 |
elsif (defined $val) { } |
392
|
0 |
0 |
unless $loaded_classes->{$class} |
403
|
0 |
0 |
unless $loaded_classes->{$class} |
413
|
0 |
0 |
unless $loaded_classes->{$class} |
419
|
0 |
0 |
if wantarray |
438
|
0 |
0 |
if ($@) |
443
|
0 |
0 |
unless ($rc->{'ok'}) |
444
|
0 |
0 |
unless $rc->{'msg'} =~ /\n$/ |