Branch Coverage

blib/lib/DBIx/DBO/Row.pm
Criterion Covered Total %
branch 82 108 75.9


line true false branch
9 1 18 unless $${$_[0];}{'array'}
51 1 24 unless eval { do { $_[0]->isa('DBIx::DBO') } }
58 1 23 unless defined $parent
61 3 20 unless blessed $parent
64 13 10 if ($parent->isa('DBIx::DBO::Query')) { }
9 1 elsif ($parent->isa('DBIx::DBO::Table')) { }
65 1 12 if $$parent{'DBO'} != $dbo
75 1 8 if $$parent{'DBO'} != $dbo
88 1 19 wantarray ? :
95 244 35 if exists $$$me{'Parent'}{'build_data'}{$f}
101 2 1104 if _isa($val, 'DBIx::DBO::Column') and $$val[0] == $$$me{'Parent'}
103 20 663 ref $val eq 'HASH' ? :
421 683 ref $val eq 'ARRAY' ? :
123 33 3 if $tbl == $$$me{'Tables'}[$i]
130 2 33 if $tbl == $me
132 0 33 unless defined $i
133 8 25 @{$$$me{'Tables'};} > 1 ? :
145 1 12 if $$$me{'Parent'}
148 0 0 if (@{$$$me{'build_data'}{'Showing'};}) { }
149 0 0 _isa($_, 'DBIx::DBO::Table', 'DBIx::DBO::Query') ? :
155 0 12 unless @{$$$me{'Columns'};}
165 5 15 @{$$$me{'build_data'}{'Showing'};} ? :
166 21 4 if (_isa($shown, 'DBIx::DBO::Table'))
167 19 2 if ($$col[0] == $shown and exists $$shown{'Column_Idx'}{$$col[1]})
174 1 1 if not defined $$shown[1] and @{$$shown[0];} == 1 and $col == $$shown[0][0]
190 1 0 unless @show = @{$$$me{'build_data'}{'Showing'};}
194 0 0 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'}
202 0 15 unless defined $_check_aliases
204 0 15 if $_check_aliases == 1 and $column = $me->_check_alias($col)
206 15 0 if exists $$tbl{'Column_Idx'}{$col}
208 0 0 if $_check_aliases == 2 and $column = $me->_check_alias($col)
209 0 0 $_check_aliases ? :
215 0 0 if ref $fld eq 'ARRAY' and exists $$fld[2]{'AS'} and $col eq $$fld[2]{'AS'}
236 1 6 unless $$$me{'array'}
237 4 2 if (_isa($col, 'DBIx::DBO::Column'))
239 4 0 if defined $i
242 1 1 if exists $$$me{'hash'}{$col}
268 10 0 $old_qw < 0 ? :
281 0 11 unless $sth and $sth->execute(@bind)
287 25 2 unless exists $hash{$_}
289 1 10 unless $$$me{'array'} = $sth->fetch
296 4 7 if (exists $$$me{'Parent'})
302 3 1 if ($$$me{'Parent'}{'Config'} and %{$$$me{'Parent'}{'Config'};})
303 1 2 $$$me{'Config'} ? :
325 1 4 unless $$$me{'array'}
328 0 4 $me->config('LimitRowUpdate') && $me->tables == 1 ? :
332 4 0 if $rv and $rv > 0
352 1 1 unless $$$me{'array'}
354 0 1 $me->config('LimitRowDelete') && $me->tables == 1 ? :
411 19 82 if @_
412 7 75 defined $$$me{'Parent'} ? :
417 3 1 unless exists $$$me{'Parent'}
424 0 1 $$$me{'Config'} ? :
1 0 if $$parent{'Config'} and %{$$parent{'Config'};}