| blib/lib/Class/DBI/Search/Basic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 15 | 0.0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 88 | 0 | 0 | 0 | ref $proto || $proto |
| 115 | 0 | 0 | 0 | $class->find_column($col) || &List::Util::first(sub { $_->accessor eq $col; } , $class->columns) || $class->_croak("$col is not a column of $class") |
| 124 | 0 | 0 | 0 | $$self{'_qual_bind'} ||= do { my $search_for = $self->_search_for; my $type = $self->type; my(@qual, @bind); foreach my $column (sort keys %$search_for) { if (defined(my $value = $$search_for{$column})) { push @qual, "$column $type ?"; push @bind, $value; } else { push @qual, "$column IS NULL"; } ; } ; [\@qual, \@bind] } |
| 144 | 0 | 0 | 0 | $$self{'_qual'} ||= $self->_qual_bind->[0] |
| 149 | 0 | 0 | 0 | $$self{'_bind'} ||= $self->_qual_bind->[1] |