Branch Coverage

blib/lib/Teng/Row.pm
Criterion Covered Total %
branch 37 44 84.0


line true false branch
37 3 285 if @_
52 0 285 if ($self->{'_untrusted_row_data'}{$col})
57 258 27 unless ($data)
58 222 36 $self->{'table'} ? :
73 1 378 unless ($col)
77 376 2 if (exists $self->{'row_data'}{$col}) { }
78 2 374 if (exists $self->{'_dirty_columns'}{$col}) { }
101 3 28 if (defined $self->{'row_data'}{$col} and defined $val and $self->{'row_data'}{$col} eq $val)
107 2 26 if (ref $val eq 'SCALAR')
138 1 28 if (ref $self eq 'Teng::Row')
144 0 28 unless ($table)
148 23 5 if ($upd)
154 2 26 if ($where) { }
165 4 20 unless %$upd
169 20 0 if ($result > 0)
183 1 14 if (ref $self eq 'Teng::Row')
201 0 47 unless ($table)
207 2 45 unless ($pk)
212 45 0 if (ref $pk eq 'ARRAY') { }
213 2 43 unless (@$pk)
219 4 39 unless (grep({exists $pks{$_};} @{$$self{'select_columns'};}) == @$pk)
225 0 0 unless (grep {$pk eq $_;} @{$$self{'select_columns'};})