Branch Coverage

blib/lib/Net/Clacks/PostgreSQL2Clacks.pm
Criterion Covered Total %
branch 0 52 0.0


line true false branch
26 0 0 unless (defined $self->{'clacks'})
31 0 0 unless (defined $self->{'clacks'}{'socket'})
37 0 0 unless (defined $self->{'clacks'}{$required})
42 0 0 unless (defined $self->{'clacks'}{'caching'})
46 0 0 unless (defined $self->{'postgres'})
51 0 0 unless (defined $self->{'postgres'}{$required})
58 0 0 if (defined $self->{'clacks'}{'socket'}) { }
61 0 0 unless $clacks = "Net::Clacks::Client"->newSocket($self->{'clacks'}{'socket'}, $self->{'clacks'}{'username'}, $self->{'clacks'}{'password'}, $self->{'clacks'}{'clientname'}, $self->{'clacks'}{'caching'})
65 0 0 unless $clacks = "Net::Clacks::Client"->new($self->{'clacks'}{'server'}, $self->{'clacks'}{'port'}, $self->{'clacks'}{'username'}, $self->{'clacks'}{'password'}, $self->{'clacks'}{'clientname'}, $self->{'clacks'}{'caching'})
70 0 0 unless my $dbh = "DBI"->connect($self->{'postgres'}{'url'}, $self->{'postgres'}{'username'}, $self->{'postgres'}{'password'}, {"AutoCommit", 0, "RaiseError", 0, "AutoInactiveDestroy", 1})
92 0 0 unless ($self->{'dbh'}->do($stmt))
114 0 0 unless ($self->{'dbh'}->ping)
121 0 0 if (time < $self->{'nextping'})
131 0 0 if ($message->{'type'} eq 'serverinfo') { }
0 0 elsif ($message->{'type'} eq 'disconnect') { }
0 0 elsif ($message->{'type'} eq 'reconnected') { }
134 0 0 if ($message->{'data'} eq "timeout")
151 0 0 unless (defined $name)
155 0 0 unless (defined $value)
160 0 0 if ($command eq 'NOTIFY') { }
0 0 elsif ($command eq 'SET') { }
0 0 elsif ($command eq 'STORE') { }
0 0 elsif ($command eq 'SETANDSTORE') { }
0 0 elsif ($command eq 'INCREMENT') { }
0 0 elsif ($command eq 'DECREMENT') { }
0 0 elsif ($command eq 'REMOVE') { }