Branch Coverage

blib/lib/Net/Gnats/Session.pm
Criterion Covered Total %
branch 56 76 73.6


line true false branch
32 2 42 unless %o
74 12 11 unless defined $self->{'database'}
75 0 23 if (defined $value)
76 0 0 if $self->{'database'} eq $value
77 0 0 if $self->issue('Net::Gnats::Command'->chdb('database', $value))->is_ok
97 1 89 if defined $value
98 28 62 unless defined $self->{'hostname'}
104 16 29 unless defined $self->{'authenticated'}
110 0 16 unless defined $self->{'connected'}
126 12 39 if defined $value
140 0 90 if defined $value
141 29 61 unless defined $self->{'port'}
164 44 45 unless defined $self->{'skip_version'}
165 1 88 if defined $value
179 12 50 if defined $value
210 0 38 unless $c->is_ok
212 38 0 unless defined $self->schema
233 0 44 if defined $self->{'gsock'}
243 0 44 unless defined $self->{'gsock'}
249 0 44 unless defined $response->code
250 0 44 if $response->code != 200
258 1 43 unless $self->check_gnatsd_version
259 1 43 unless ($self->check_gnatsd_version)
268 27 16 if defined $self->{'username'} and defined $self->{'password'}
270 16 27 unless $self->is_authenticated
272 0 27 if $self->access eq 'none' or $self->access eq 'deny' or $self->access eq 'listdb'
306 27 508 unless defined $command->as_string
312 0 508 unless defined $command->response->code
316 8 500 if ($command->response->code == 212) { }
5 495 elsif ($command->response->code == 211) { }
318 3 5 if $command->response->code == 213
339 44 0 if (defined $value)
351 2 86 if $self->skip_version
355 2 84 if $majorv != $rmajor
356 0 84 if $minorv < $min_minor
382 0 6015 unless defined $line
393 0 6015 unless (defined $line)
408 6841 0 if 'Net::Gnats'->verbose_level != 3