Branch Coverage

blib/lib/DBIx/Interp.pm
Criterion Covered Total %
branch 23 66 34.8


line true false branch
46 4 12 if ($want) { }
49 0 16 if ($@)
50 4 12 $want ? :
69 1 0 if (UNIVERSAL::isa($_[0], 'DBI::db')) { }
0 0 elsif (ref $_[0] eq 'ARRAY') { }
74 0 0 unless defined $dbh
103 0 0 unless $dbh
106 0 0 if ($@)
131 0 36 if (ref $_ eq 'DBIx::Interp::Key') { }
0 36 elsif (ref $_ eq 'DBIx::Interp::Attr') { }
141 0 8 if defined $key
148 8 0 if (UNIVERSAL::isa($_[0], 'DBIx::Interp::db')) { }
164 0 0 unless $stx->execute_i(@list)
166 0 0 if my $row = $sth->$method
184 0 0 unless $stx->execute_i(@list)
187 0 0 $rows == 0 ? :
198 0 0 unless my $row = $self->_do_selectrow_i('fetchrow_arrayref', @list)
200 0 0 unless $want
237 0 2 unless $stx->execute_i(@list)
241 0 2 if (not $slice and $slice = $attr->{'Columns'})
242 0 0 if (ref $slice eq 'ARRAY')
249 0 2 if defined $MaxRows
267 0 0 unless $stx->execute_i(@list)
285 0 0 unless $stx->execute_i(@list)
286 0 0 $attr->{'Columns'} ? :
291 0 0 unless $sth->bind_col($_, \$values[$idx++])
294 0 0 if (my $max = $attr->{'MaxRows'}) { }
337 1 1 if (defined $max_sths) { }
361 0 6 if defined $bind[0] and ref $bind[0] eq ''
364 5 1 unless (defined $sth)
365 0 5 unless $sth = $self->{'dbx'}->prepare($sql, $attr)
366 2 3 if (@{$self->{'sql_queue'};} + 1 > $self->{'max_sths'})
383 1 5 if (ref $bind[0] eq 'ARRAY') { }