|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
27
 | 
 0  | 
 0  | 
 unless defined $$self{'_REGISTRY'}{$package}  | 
 
| 
42
 | 
 0  | 
 0  | 
 unless defined $$self{'_REGISTRY'}{$package}  | 
 
| 
61
 | 
 0  | 
 0  | 
 if ($_[0])  | 
 
| 
70
 | 
 0  | 
 0  | 
 !$_ ? :  | 
 
| 
 | 
 0  | 
 0  | 
 if /[01]/  | 
 
| 
 | 
 0  | 
 0  | 
 if (@_)  | 
 
| 
79
 | 
 0  | 
 0  | 
 unless my(@vars) = $self->_vars($package)  | 
 
| 
81
 | 
 0  | 
 0  | 
 if ($self->_isobject($var))  | 
 
| 
82
 | 
 0  | 
 0  | 
 unless ($$self{'var'} and $$self{'_REGISTRY'}{'_DATA'}{$var}{'data'} eq $$self{$var})  | 
 
| 
99
 | 
 0  | 
 0  | 
 unless my(@vars) = $self->_vars($package)  | 
 
| 
101
 | 
 0  | 
 0  | 
 if ($self->_isobject($var))  | 
 
| 
130
 | 
 0  | 
 0  | 
 if $$self{'_REGISTRY'}{'_DATA'}{$var}{'source'} eq $package  | 
 
| 
147
 | 
 0  | 
 0  | 
 unless $sth->execute(@_)  | 
 
| 
148
 | 
 0  | 
 0  | 
 if ($sth->rows != 1) { }  | 
 
| 
172
 | 
 0  | 
 0  | 
 if (UNIVERSAL::isa($_[0], 'DBIx::Object'))  | 
 
| 
174
 | 
 0  | 
 0  | 
 if ($$self{'_REGISTRY'}{'_DATA'}{uc $param})  | 
 
| 
176
 | 
 0  | 
 0  | 
 unless ($self->valid($source))  | 
 
| 
180
 | 
 0  | 
 0  | 
 if (@_ and not $self->_readonly($source, $param))  | 
 
| 
181
 | 
 0  | 
 0  | 
 if ($self->_isbasic($param)) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($self->_isobject($param)) { }  | 
 
| 
185
 | 
 0  | 
 0  | 
 unless ($self->_isobjarray($param))  | 
 
| 
187
 | 
 0  | 
 0  | 
 if (ref $temp eq $$self{'_REGISTRY'}{'_DATA'}{uc $param}{'class'}) { }  | 
 
| 
198
 | 
 0  | 
 0  | 
 if ($self->_isobject($param))  | 
 
| 
199
 | 
 0  | 
 0  | 
 wantarray ? :  | 
 
| 
 | 
 0  | 
 0  | 
 unless $self->_o_prep($param)  | 
 
| 
201
 | 
 0  | 
 0  | 
 if ($self->_isobjarray($param)) { }  | 
 
| 
202
 | 
 0  | 
 0  | 
 wantarray ? :  | 
 
| 
219
 | 
 0  | 
 0  | 
 if (@_)  | 
 
| 
220
 | 
 0  | 
 0  | 
 if $self->_primary  | 
 
| 
236
 | 
 0  | 
 0  | 
 if ($self->_primary) { }  | 
 
| 
268
 | 
 0  | 
 0  | 
 if (@_ and not $self->_readonly('id'))  | 
 
| 
323
 | 
 0  | 
 0  | 
 unless $self->valid($source)  | 
 
| 
324
 | 
 0  | 
 0  | 
 if $$self{'_REGISTRY'}{'_DATA'}{$var}{'prep'}  | 
 
| 
326
 | 
 0  | 
 0  | 
 if ($self->_isobjarray($var)) { }  | 
 
| 
332
 | 
 0  | 
 0  | 
 ($$self{$var} = $class->new($$self{'_REGISTRY'}{'_DATA'}{$var}{'data'})) ? :  | 
 
| 
354
 | 
 0  | 
 0  | 
 if ($_[0])  | 
 
| 
361
 | 
 0  | 
 0  | 
 if ($_[0])  | 
 
| 
370
 | 
 0  | 
 0  | 
 unless $sth->execute(@_)  | 
 
| 
371
 | 
 0  | 
 0  | 
 if ($sth->rows != 1) { }  |