Branch Coverage

blib/lib/Karas.pm
Criterion Covered Total %
branch 24 80 30.0


line true false branch
41 0 10 @_ == 1 ? :
42 0 10 unless ($args{'connect_info'})
75 0 0 if ref $class
76 0 0 if $class eq 'Karas'
78 0 0 $name =~ s/^\+// ? :
91 0 57 if @_ != 0
97 0 1 if @_ != 1
111 0 0 if ($class eq 'Karas') { }
127 0 23 unless $table_name
128 0 23 unless my $row_class = $self->row_class_map->{$table_name}
177 0 0 if (@rows == $rows + 1)
195 0 0 unless ($table_name)
208 0 11 unless defined $table
209 0 11 unless defined $values
216 4 7 if (@pk == 1 and defined $last_insert_id)
226 0 0 unless defined $table
227 0 0 unless defined $values
253 0 4 unless defined $table
254 0 4 if @_ > 3
258 3 1 if (ref $vals eq 'HASH') { }
0 1 elsif (ref $vals) { }
264 0 1 if (@pk != 1)
273 4 0 if ($row) { }
282 1 0 if (UNIVERSAL::isa($_[0], 'Karas::Row')) { }
293 0 0 if ref $table_name
294 0 0 if @_ != 3
304 0 1 unless defined $table
305 0 1 unless defined $set
314 0 0 if (UNIVERSAL::isa($_[0], 'Karas::Row')) { }
332 0 0 unless defined $table
333 0 0 unless defined $where
347 0 0 unless defined $table_name
348 0 0 unless ref $rows_data eq 'ARRAY'
350 0 0 if ($self->_driver_name eq 'mysql') { }
374 0 0 if ($self->_driver_name eq 'mysql') { }
390 2 0 if ($sql =~ /\sfrom\s+["`]?([\w]+)["`]?\s*/is)
411 0 13 if ($driver eq 'mysql') { }
0 13 elsif ($driver eq 'Pg') { }
13 0 elsif ($driver eq 'SQLite') { }
0 0 elsif ($driver eq 'Oracle') { }