Branch Coverage

blib/lib/DBIx/Squirrel/db.pm
Criterion Covered Total %
branch 33 90 36.6


line true false branch
29 0 9 unless keys %DBIx::Squirrel::
37 0 16 wantarray ? :
42 1 7 unless defined $self->{'private_ekorn'}
43 5 3 unless (@_)
44 3 2 if wantarray
47 1 2 unless (defined $_[0])
51 2 1 if (@_)
52 0 2 unless defined $self->{'private_ekorn'}
53 1 1 if (UNIVERSAL::isa($_[0], 'HASH')) { }
66 3 13 if (UNIVERSAL::isa($statement, "CODE"))
69 4 12 if (UNIVERSAL::isa($statement, "ARRAY"))
78 0 16 unless defined $normalised_statement
80 0 16 unless my $sth = DBI::db::prepare($self, $normalised_statement, @_)
95 0 0 if (UNIVERSAL::isa($statement, "CODE"))
98 0 0 if (UNIVERSAL::isa($statement, "ARRAY"))
107 0 0 unless defined $normalised_statement
109 0 0 unless my $sth = DBI::db::prepare_cached($self, $normalised_statement, @_)
126 0 0 if (@_) { }
127 0 0 if (ref $_[0]) { }
128 0 0 if (UNIVERSAL::isa($_[0], 'HASH')) { }
0 0 elsif (UNIVERSAL::isa($_[0], 'ARRAY')) { }
140 0 0 if (defined $_[0]) { }
153 0 0 wantarray ? :
160 1 1 if (@_) { }
161 1 0 if (ref $_[0]) { }
162 0 1 if (UNIVERSAL::isa($_[0], 'HASH')) { }
0 1 elsif (UNIVERSAL::isa($_[0], 'ARRAY')) { }
1 0 elsif (UNIVERSAL::isa($_[0], 'CODE')) { }
177 0 0 if (defined $_[0]) { }
203 1 1 if (@_) { }
204 1 0 if (ref $_[0]) { }
205 0 1 if (UNIVERSAL::isa($_[0], 'HASH')) { }
0 1 elsif (UNIVERSAL::isa($_[0], 'ARRAY')) { }
1 0 elsif (UNIVERSAL::isa($_[0], 'CODE')) { }
220 0 0 if (defined $_[0]) { }
245 0 0 unless my $tuples = get_file_contents($filename)
246 0 0 unless @_
251 0 0 unless shift()
255 0 0 if ($opts->{'progress'})
262 0 0 if ($opts->{'progress'})
265 0 0 if ($percent > $before)
272 0 0 unless $self->{'AutoCommit'}
276 0 0 unless ($self->{'AutoCommit'})
282 0 0 if $opts->{'disconnect'}
283 0 0 if $opts->{'progress'}