Branch Coverage

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


line true false branch
40 3 36 @_ % 2 ? :
39 0 exists $self->{'table'} ? :
0 39 exists $self->{'type'} ? :
39 0 exists $self->{'primary_key'} ? :
39 0 exists $self->{'bind_type'} ? :
40 38 exists $self->{'join'} ? :
39 6 @_ % 2 ? :
6 39 exists $self->{'table'} ? :
39 6 exists $self->{'type'} ? :
45 0 exists $self->{'primary_key'} ? :
45 0 exists $self->{'bind_type'} ? :
24 0 exists $self->{'mtime'} ? :
18 3 @_ % 2 ? :
3 18 exists $self->{'table'} ? :
18 3 exists $self->{'type'} ? :
21 0 exists $self->{'primary_key'} ? :
21 0 exists $self->{'bind_type'} ? :
39 0 @_ % 2 ? :
21 3 exists $self->{'table'} ? :
3 21 exists $self->{'type'} ? :
21 3 exists $self->{'primary_key'} ? :
24 0 exists $self->{'bind_type'} ? :
42 0 @_ % 2 ? :
42 0 exists $self->{'table'} ? :
2 18 exists $self->{'type'} ? :
20 0 exists $self->{'primary_key'} ? :
18 2 exists $self->{'bind_type'} ? :
23 0 exists $self->{'join'} ? :
23 0 @_ % 2 ? :
4 3 exists $self->{'table'} ? :
5 0 exists $self->{'type'} ? :
3 2 exists $self->{'primary_key'} ? :
5 0 exists $self->{'bind_type'} ? :
5 0 @_ % 2 ? :
3 38 exists $self->{'table'} ? :
39 6 exists $self->{'type'} ? :
6 39 exists $self->{'primary_key'} ? :
39 6 exists $self->{'bind_type'} ? :
45 0 exists $self->{'ctime'} ? :
45 0 exists $self->{'mtime'} ? :
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}