Branch Coverage

blib/lib/DBD/Log/Sth.pm
Criterion Covered Total %
branch 17 52 32.6


line true false branch
43 0 0 unless $self->dbiLogging
46 0 0 if ($self->logThis->[0] ne 'all' and not grep({$_ eq $command;} @{$self->logThis;}))
59 2 0 unless $self->fullLogging
62 0 2 if ($self->logThis->[0] ne 'all' and not grep({$_ eq $command;} @{$self->logThis;}))
68 2 0 if ($function eq 'execute') { }
0 0 elsif ($function eq 'execute_array') { }
72 0 0 if (ref $self->bound->[0]) { }
90 2 0 if ($statement =~ /\?/) { }
0 0 elsif ($statement =~ /\:\w+/) { }
95 0 2 unless defined $bound[$_]
99 0 2 if $val =~ /\D+/
105 0 2 if ($#parts + 1 < $#bound) { }
126 0 0 if @list
128 0 0 if ref($var) =~ /scalar/i
129 0 0 if $var =~ /\D+/
145 2 0 if ($#rest >= 0)
147 2 0 if ($sub eq 'execute') { }
0 0 elsif ($sub eq 'execute_array') { }
0 0 elsif ($#rest >= 1 and $rest[0] =~ /\D+/) { }
151 0 0 if ($#rest >= 1)
173 2 0 if $sub =~ /execute/
174 0 2 unless $sub =~ /execute/
178 1 1 if (my $error = $self->dbi->errstr || $self->sth->errstr)
186 1 1 unless caller $_
188 0 1 if ($package =~ /dbd/i) { }
0 1 elsif ($package =~ /dbi/i) { }