line |
true |
false |
branch |
137
|
1 |
187 |
unless (length $app_name <= 128) |
175
|
31 |
156 |
length $self->username || length $source ? : |
534
|
3 |
164 |
defined $self->_deferred->{'password'} ? : |
|
19 |
167 |
defined $self->_uri->password ? : |
953
|
2 |
0 |
if ($ssl and exists $self->_deferred->{'ssl'}) |
990
|
3 |
156 |
defined $self->_deferred->{'username'} ? : |
|
28 |
159 |
defined $self->_uri->username ? : |
1097
|
185 |
0 |
defined $self->read_pref_mode ? : |
|
185 |
0 |
defined $self->read_pref_tag_sets ? : |
|
185 |
0 |
defined $self->max_staleness_seconds ? : |
1130
|
10 |
173 |
defined $self->w ? : |
|
7 |
176 |
defined $self->j ? : |
1156
|
4 |
1 |
$self->read_concern_level ? : |
1217
|
0 |
180 |
@{$self->_uri->hostids;} > 1 ? : |
|
2 |
180 |
length $self->replica_set_name ? : |
1220
|
173 |
0 |
$self->connect_timeout_ms >= 0 ? : |
|
173 |
0 |
$self->socket_timeout_ms >= 0 ? : |
|
1 |
172 |
ref $self->ssl eq 'HASH' ? : |
1261
|
30 |
152 |
$self->username ? : |
|
21 |
161 |
$self->password ? : |
|
11 |
171 |
$source ? : |
|
16 |
166 |
$self->db_name ? : |
1282
|
132 |
56 |
if ($self->host =~ m[^[\w\+]+://]) { } |
1288
|
1 |
55 |
$self->host =~ /:\d+$/ ? : |
1396
|
182 |
0 |
unless ($self->bson_codec->error_callback) |
1401
|
0 |
0 |
if ($op =~ /^encode/) { } |
1432
|
401 |
3902 |
exists $deferred->{$e} ? : |
|
81 |
4303 |
exists $uri_options->{$u} ? : |
1438
|
189 |
185 |
if defined $_ |
1534
|
0 |
0 |
if $opts{'refresh'} |
1561
|
0 |
0 |
unless ($self->_topology->_supports_sessions) |
1572
|
0 |
0 |
unless $self->_topology->_supports_sessions |
1606
|
0 |
0 |
ref $read_pref ? : |
|
0 |
0 |
if $read_pref and ref $read_pref ne 'MongoDB::ReadPreference' |
1627
|
0 |
0 |
ref $read_pref ? : |
|
0 |
0 |
if $read_pref and ref $read_pref ne 'MongoDB::ReadPreference' |
1671
|
0 |
0 |
$args ? : |
1672
|
0 |
0 |
if (ref $output eq 'HASH' and exists $output->{'databases'}) |
1676
|
0 |
0 |
unless (eval {
do {
my $output = $self->send_admin_command(['listDatabases', 1, $args ? %$args : ()])->output;
if (ref $output eq 'HASH' and exists $output->{'databases'}) {
@databases = @{$output->{'databases'};};
};
return 1
}
}) |
1678
|
0 |
0 |
if ($error->$MongoDB::MongoClient::_isa('MongoDB::DatabaseError')) |
1679
|
0 |
0 |
if $error->result->output->{'code'} == 15927 |
1728
|
0 |
0 |
$options ? : |
1766
|
0 |
0 |
unless defined $ns and length $ns |
1769
|
0 |
0 |
unless defined $db and defined $coll |
1827
|
0 |
0 |
if (defined $session) { } |
1828
|
0 |
0 |
if $session->client->_id ne $self->_id |
1830
|
0 |
0 |
unless defined $session->session_id |
1893
|
0 |
0 |
exists $options->{'startAtOperationTime'} ? : |
|
0 |
0 |
exists $options->{'fullDocument'} ? : |
|
0 |
0 |
exists $options->{'resumeAfter'} ? : |
|
0 |
0 |
exists $options->{'startAfter'} ? : |
|
0 |
0 |
exists $options->{'maxAwaitTimeMS'} ? : |