Branch Coverage

blib/lib/DBIx/Squirrel/st.pm
Criterion Covered Total %
branch 53 68 77.9


line true false branch
25 0 9 unless keys %DBIx::Squirrel::
48 16 59 unless defined $self->{'private_ekorn'}
49 59 16 unless (@_)
50 0 59 if wantarray
53 0 16 unless (defined $_[0])
57 16 0 if (@_)
58 16 0 if (UNIVERSAL::isa($_[0], 'HASH')) { }
77 16 9 unless $count == $total_count
86 0 8 if ($positional) { }
90 2 6 if (UNIVERSAL::isa($_[0], 'HASH')) { }
94 2 4 if (UNIVERSAL::isa($_[0], 'ARRAY')) { }
95 0 2 unless @{$_[0];} and @{$_[0];} % 2 == 0
99 1 3 unless @_ and @_ % 2 == 0
105 0 8 wantarray ? :
110 17 0 if (@_)
111 9 8 if ($self->_placeholders_confirm_positional) { }
112 0 9 if (UNIVERSAL::isa($_[0], 'ARRAY')) { }
120 8 0 if (my(%kv) = @{$self->_placeholders_map_to_values(@_);})
122 1 7 if ($k =~ /^[\:\$\?]?(?\d+)$/) { }
123 0 1 unless $+{'bind_id'}
141 17 0 if ($placeholders) { }
142 10 7 if ($param =~ /^[\:\$\?]?(?\d+)$/) { }
148 4 3 if ($param =~ /^[\:\$\?]/) { }
161 0 17 unless $self->SUPER::bind_param(@args)
162 0 17 wantarray ? :
167 10 12 if $FINISH_ACTIVE_BEFORE_EXECUTE and $self->{'Active'}
168 17 5 if @_
205 1 29 unless length $trimmed
207 14 15 if (my(@params) = $trimmed =~ /[\:\$\?]\w+\b/g) { }
220 3 36 if (ref $_[0]) { }
221 1 2 if (UNIVERSAL::isa($_[0], 'DBIx::Squirrel::st')) { }
1 1 elsif (UNIVERSAL::isa($_[0], 'DBI::st')) { }
232 34 2 defined $_[0] ? :
238 34 4 $statement =~ /\S/ ? :