Branch Coverage

blib/lib/CPAN/SQLite/Search.pm

Criterion	Covered	Total	%
branch	60	84	71.4

line	true	false	branch
26	0	949	if $args{'max_results'}
34	0	1605	unless ($mode)
40	0	1605	unless ($table)
46	0	1605	unless ($cdbi and ref $cdbi eq $class)
52	0	1605	if ($@)
63	38	1567	if ($value = $args{'query'})
69	0	1567	if ($value = $args{'id'})
75	1567	0	if ($value = $args{'name'})
87	0	1605	if (my $error = $obj->{'error'})
97	0	3210	unless defined $args{$_}
112	0	26	unless $args{'search'}
117	0	26	if ($CPAN::SQLite::Search::max_results)
122	16	10	$meta_obj ? :
	13	13	unless $results = $meta_obj ? $cdbi->fetch_and_set(%args) : $cdbi->fetch(%args)
126	7	6	unless ($meta_obj)
127	0	7	ref $results eq 'ARRAY' && scalar @$results == 1 ? :
129	6	7	if $meta_obj
136	3	4	ref $results eq 'ARRAY' ? :
145	0	13	unless $dists = $cdbi->fetch(%args, "search", $search)
146	13	0	ref $dists eq 'ARRAY' ? :
148	0	7	ref $results eq 'ARRAY' && scalar @$results == 1 ? :
157	0	1473	unless $args{'search'}
172	0	1473	if ($CPAN::SQLite::Search::max_results)
176	923	550	$meta_obj ? :
	9	1464	unless $results = $meta_obj ? $cdbi->fetch_and_set(%args, "want_ids", 1) : $cdbi->fetch(%args)
183	917	547	if ($meta_obj)
187	10	907	ref $results eq 'ARRAY' ? :
190	210	943	if $seen{$dist_id}
206	0	943	unless $mods = $cdbi->fetch_and_set(%args, "search", $search, "set_list", 1, "download", $item->{'download'})
209	547	917	unless ($meta_obj)
210	0	547	ref $results eq 'ARRAY' && scalar @$results == 1 ? :
220	0	106	unless $args{'search'}
231	0	106	if ($CPAN::SQLite::Search::max_results)
235	8	98	$meta_obj ? :
	5	101	unless $results = $meta_obj ? $cdbi->fetch_and_set(%args, "want_ids", 1) : $cdbi->fetch(%args)
244	9	92	ref $results eq 'ARRAY' ? :
261	52	200	$meta_obj ? :
	0	252	unless $mods = $meta_obj ? $cdbi->fetch_and_set(%args, "search", $search, "set_list", 1, "download", $item->{'download'}) : $cdbi->fetch(%args, "search", $search)
262	52	200	if $meta_obj
263	200	0	ref $mods eq 'ARRAY' ? :
265	95	6	unless ($meta_obj)
266	0	95	ref $results eq 'ARRAY' && scalar @$results == 1 ? :