Branch Coverage

lib/CGI/Application/Plugin/MetadataDB.pm
Criterion Covered Total %
branch 2 54 3.7


line true false branch
60 0 4 unless defined $class
61 0 4 unless defined $name
67 0 0 if (defined $val)
72 0 0 unless (defined $$self{$name})
75 0 0 if (defined ${"${class}::$name";})
89 0 0 if (defined $tmpl)
93 0 0 unless ($$self{'_mdw_search_tmpl'})
95 0 0 unless $ENV{'HTML_TEMPLATE_ROOT'}
98 0 0 if DEBUG()
101 0 0 unless -f $abs
114 0 0 if (defined $tmpl)
117 0 0 unless ($$self{'_mdw_search_results_tmpl'})
121 0 0 if DEBUG()
175 0 0 unless $prepend
181 0 0 unless my(@a) = $self->query->param("${prepend}_attribute")
185 0 0 unless (defined @a and scalar @a)
195 0 0 unless defined $val and $val =~ /\w/
198 0 0 unless $type
208 0 0 unless %h
228 0 0 if ($count > $limit)
252 0 0 unless ($_ =~ /_path$/)
289 0 0 unless ($$self{'_mdsearch_object'})
292 0 0 unless $dbh
295 0 0 unless $$self{'_mdsearch_object'} = 'Metadata::DB::Search'->new({'DBH', $self->param('DBH')})
306 0 0 unless my $search_args = $self->mdw_search_args_submitted
310 0 0 unless my $mds = $self->mds_object
314 0 0 unless ($mds->search($search_args))