Branch Coverage

blib/lib/DBIx/Custom/Model.pm
Criterion Covered Total %
branch 77 110 70.0


line true false branch
40 20 0 @_ % 2 ? :
20 0 exists $self->{'table'} ? :
0 20 exists $self->{'type'} ? :
20 0 exists $self->{'primary_key'} ? :
20 0 exists $self->{'bind_type'} ? :
20 0 exists $self->{'join'} ? :
18 0 @_ % 2 ? :
0 3 exists $self->{'table'} ? :
3 0 exists $self->{'type'} ? :
0 3 exists $self->{'primary_key'} ? :
4 36 exists $self->{'bind_type'} ? :
58 2 @_ % 2 ? :
23 37 exists $self->{'table'} ? :
38 56 exists $self->{'type'} ? :
94 0 exists $self->{'primary_key'} ? :
57 37 exists $self->{'bind_type'} ? :
57 3 exists $self->{'mtime'} ? :
61 0 @_ % 2 ? :
41 39 exists $self->{'table'} ? :
42 3 exists $self->{'type'} ? :
8 37 exists $self->{'primary_key'} ? :
40 5 exists $self->{'bind_type'} ? :
45 0 exists $self->{'join'} ? :
42 3 @_ % 2 ? :
5 3 exists $self->{'table'} ? :
6 0 exists $self->{'type'} ? :
3 3 exists $self->{'primary_key'} ? :
21 0 exists $self->{'bind_type'} ? :
21 0 exists $self->{'ctime'} ? :
0 20 exists $self->{'mtime'} ? :
20 3 @_ % 2 ? :
21 2 exists $self->{'table'} ? :
20 3 exists $self->{'type'} ? :
26 0 exists $self->{'primary_key'} ? :
10 3 exists $self->{'bind_type'} ? :
5 3 @_ % 2 ? :
3 5 exists $self->{'table'} ? :
8 0 exists $self->{'type'} ? :
8 0 exists $self->{'primary_key'} ? :
8 0 exists $self->{'bind_type'} ? :
46 166 3 if (@_ == 1)
61 0 8 unless defined $opt{'id'} || defined $self->{'id'} and defined $opt{'primary_key'} || defined $self->{'primary_key'}
64 8 0 unless $statement_opt->{'select'}
65 5 3 if (@$rows == 0) { }
0 3 elsif (@$rows == 1) { }
66 5 0 unless $statement_opt->{'insert'}
69 0 0 unless $statement_opt->{'update'}
85 3 30 if (my $method = $self->{'_methods'}{$mname}) { }
30 0 elsif (my $dbi_method = $self->dbi->can($mname)) { }
0 0 elsif ($self->{'dbh'} and my $dbh_method = $self->dbh->can($mname)) { }
108 0 3 ref $_[0] eq 'HASH' ? :
109 3 0 unless $self->{'_methods'}
116 18 6 unless ref $_[0]
132 0 283 unless $self->can($attr)
139 1162 399 unless exists $self->{$attr}