Branch Coverage

blib/lib/ACME/QuoteDB.pm
Criterion Covered Total %
branch 82 104 78.8


line true false branch
64 70 84 if (not $f_obj->$field or scalar grep({/$s/ms;} @{$arr_ref;}))
80 0 114 unless $c_obj->attr_id
84 4 41 unless (scalar @{$c_ids;})
100 0 2 unless $c_obj->quot_id
104 0 2 unless (scalar @{$q_ids;})
115 8 73 unless $v
116 3 70 if (ref $v eq 'ARRAY') { }
145 0 13 unless $rating
150 1 12 if ($upper and not $lower)
158 4 37 if ($lower and $upper) { }
8 29 elsif ($lower and not $upper) { }
0 58 elsif ($upper and not $lower) { }
181 0 23 unless $c_obj->catg
183 21 2 if (ref $catgs eq 'ARRAY') { }
185 11 66 if ($c_obj->catg eq $c)
192 1 1 if ($c_obj->catg eq $catgs)
207 0 156 unless $qc_obj->quot_id
209 156 0 if (ref $catg_ids eq 'ARRAY') { }
211 81 411 if ($qc_obj->catg_id eq $c)
218 0 0 if ($qc_obj->catg_id eq $catg_ids)
231 81 0 if ($q =~ /\A([0-9]+)\z/ms)
253 27 14 if ($attr_name) { }
263 2 39 if ($source)
268 4 37 if ($catgs)
277 3 38 if ($contain)
278 5 36 if ($limit)
308 0 236 unless $q_obj->quote
322 85 93 if (scalar grep({$arg =~ /$_/;} @{$accepted;}))
327 4 54 if (not $arg_ok)
345 2 1 if ($load_db->get_record('quote') and $load_db->get_record('name')) { }
359 0 2 unless ($arg_ref)
371 0 1 unless ($arg_ref)
388 1 0 if ($$arg_ref{'Source'})
390 1 0 if ($$arg_ref{'Rating'})
392 1 0 if ($$arg_ref{'AttrName'})
395 1 0 if ($$arg_ref{'Category'})
405 0 2 unless ($arg_ref)
421 4 24 unless ($arg_ref)
428 5 16 if ($$arg_ref{'Rating'})
433 13 8 if ($$arg_ref{'AttrName'})
438 2 19 if ($$arg_ref{'Source'})
443 3 18 if ($$arg_ref{'Category'})
473 0 22 unless ($arg_ref)
480 6 15 if ($$arg_ref{'Rating'})
485 3 18 if ($$arg_ref{'Limit'})
491 17 4 if ($$arg_ref{'AttrName'})
496 0 21 if ($$arg_ref{'Source'})
501 1 20 if ($$arg_ref{'Category'})
516 4 0 if ($$arg_ref{'Contain'}) { }
526 2 2 if ($$arg_ref{'Rating'})
531 2 1 if ($$arg_ref{'Limit'})
537 1 2 if ($$arg_ref{'AttrName'})