Branch Coverage

blib/lib/MetaCPAN/Client.pm
Criterion Covered Total %
branch 30 56 53.5


line true false branch
121 0 2 unless XXX
132 0 1 unless XXX
169 0 0 if $size eq "today"
175 0 0 if $size =~ /^[0-9]+$/
192 0 0 if $params and not XXX
195 0 0 if ($params->{'fields'} and not XXX)
210 3 1 if (defined $version_or_range)
215 2 13 if (index($version_or_range, $range) >= 0)
221 1 2 unless $is_using_range
226 1 3 if (defined $dev)
230 3 1 if scalar @extra
245 0 0 unless (eval { do { $res = $self->fetch("/search/autocomplete?q=" . uri_escape_utf8($q)); 1 } })
265 0 0 unless (eval { do { $res = $self->fetch("/search/autocomplete/suggest?q=" . uri_escape_utf8($q)); 1 } })
278 3 41 unless scalar @_ == 2 or scalar @_ == 3 and !defined($_[2]) || XXX
291 1 46 unless XXX
294 4 42 if $type eq "download_url"
303 47 0 unless $params
306 0 0 unless $fields
308 0 0 if (XXX) { }
0 0 elsif (not ref $fields) { }
309 0 0 if grep {ref $_;} @$fields
328 1 13 unless XXX
331 1 12 unless not defined $params or XXX
336 1 11 unless grep {$_ eq $type;} @supported_searches
353 7 43 if XXX
356 42 1 if defined $arg and not XXX
384 0 1 unless (eval { do { $res = $self->fetch("/reverse_dependencies/dist/$dist", {"size", 5000, "query", {"match_all", {}}, "filter", {"and", [{"term", {"status", "latest"}}, {"term", {"authorized", 1}}]}}); 1 } })
413 0 0 unless (eval { do { $res = $self->fetch("/release/_search", {"from", 0, "query", {"match_all", {}}, @args, "sort", [{"date", {"order", "desc"}}]}); 1 } })