Branch Coverage

blib/lib/DBIx/DBO/Row.pm
Criterion Covered Total %
branch 80 100 80.0


line true false branch
11 0 15 unless ${$_[0];}->{'array'}
53 1 33 unless eval { do { $_[0]->isa("DBIx::DBO") } }
62 23 10 @args == 1 && _isa($args[0], 'DBIx::DBO::Query') ? :
66 30 0 if ($parent->isa('DBIx::DBO::Query')) { }
67 1 29 if $parent->{'DBO'} != $dbo
77 1 28 wantarray ? :
92 3 75 exists $$me->{'Parent'} ? :
97 0 33 exists $$me->{'Parent'} ? :
99 33 3 if $tbl == $tables->[$i]
106 2 33 if $tbl == $me
108 0 33 unless defined $i
109 9 24 $me->tables > 1 ? :
121 1 11 if exists $$me->{'Parent'}
126 3 3 _isa($_, 'DBIx::DBO::Table', 'DBIx::DBO::Query') ? :
128 3 2 @{$me->_build_data->{'select'};} ? :
140 15 5 unless @show = @{$me->_build_data->{'select'};}
142 21 4 if (_isa($fld, "DBIx::DBO::Table"))
143 19 2 if ($col->[0] == $fld and exists $fld->{'Column_Idx'}{$col->[1]})
150 1 1 if not defined $fld->[1] and @{$fld->[0];} == 1 and $col == $fld->[0][0]
166 1 1 unless @show = @{$me->_build_data->{'select'};}
171 1 1 if _isa($fld, "DBIx::DBO::Table") and exists $fld->{'Column_Idx'}{$col} or _isa($fld, "DBIx::DBO::Query") and eval { do { $fld->column($col) } } or ref $fld eq "ARRAY" and exists $fld->[2]{'AS'} and $col eq $fld->[2]{'AS'}
178 0 13 unless defined $_check_aliases
180 0 13 if $_check_aliases == 1 and $column = $me->_check_alias($col)
182 13 0 if exists $tbl->{'Column_Idx'}{$col}
184 0 0 if $_check_aliases == 2 and $column = $me->_check_alias($col)
185 0 0 $_check_aliases ? :
192 0 0 if ref $fld eq "ARRAY" and exists $fld->[2]{'AS'} and $col eq $fld->[2]{'AS'}
212 1 5 unless $$me->{'array'}
213 4 1 if (_isa($col, "DBIx::DBO::Column"))
215 4 0 if defined $i
218 1 0 if exists $$me->{'hash'}{$col}
243 8 0 $old_qw < 0 ? :
255 0 9 unless $sth and $sth->execute(@bind)
261 20 2 unless exists $hash{$_}
263 1 8 unless $$me->{'array'} = $sth->fetch
270 26 9 if (exists $$me->{'Parent'})
274 34 52 if defined $_ and $_ == $me
280 107 23 if exists $$me->{'Parent'}{'build_data'}{$f}
283 16 10 if ($$me->{'Parent'}{'Config'} and %{$$me->{'Parent'}{'Config'};})
284 1 15 $$me->{'Config'} ? :
293 2 286 if _isa($val, "DBIx::DBO::Column") and $val->[0] == $$me->{'Parent'}
294 13 100 ref $val eq 'HASH' ? :
173 113 if (ref $val eq 'ARRAY') { }
313 1 4 unless $$me->{'array'}
316 0 4 $me->config('LimitRowUpdate') && $me->tables == 1 ? :
320 4 0 if $rv and $rv > 0
340 1 1 unless $$me->{'array'}
342 0 1 $me->config('LimitRowDelete') && $me->tables == 1 ? :
399 17 77 if @_
400 1 76 defined $$me->{'Parent'} ? :