Branch Coverage

blib/lib/MyLibrary/Librarian.pm
Criterion Covered Total %
branch 25 90 27.7


line true false branch
230 0 1 if ($opts{'id'})
233 0 0 if ($opts{'id'} =~ /\D/)
246 0 0 if (ref $rv eq 'HASH') { }
275 1 1 if ($telephone)
289 1 1 if ($name)
303 1 1 if ($email)
317 1 0 if ($opts{'new'})
321 0 1 if ($opts{'del'})
325 0 1 if ($opts{'sort'})
326 0 0 if ($opts{'sort'} eq 'name')
332 1 0 if ($opts{'strict'}) { }
333 0 1 if ($opts{'strict'} eq 'on') { }
1 0 elsif ($opts{'strict'} eq 'off') { }
0 0 elsif (not $opts{'strict'} =~ /^\d$/ and $opts{'strict'} == 1 || $opts{'strict'} == 0 or $opts{'strict'} ne 'off' or $opts{'strict'} ne 'on') { }
346 1 0 if (@new_related_terms)
348 0 3 unless ($new_related_term =~ /^\d+$/)
351 0 3 if ($strict_relations eq 'on')
356 0 0 if ($term_list_val == $new_related_term) { }
363 0 0 if ($found_term == 0)
368 2 1 if ($$self{'term_ids'}) { }
370 0 3 if ($new_related_term == $related_term) { }
380 0 3 if ($found) { }
387 0 1 if (@del_related_terms)
392 0 0 if ($$self{'term_ids'}[$i] == $del_related_term)
401 1 0 if (ref $$self{'term_ids'} eq 'ARRAY' and scalar @{$$self{'term_ids'};} >= 1) { }
402 0 1 if ($sort_type)
403 0 0 if ($sort_type eq 'name')
427 1 1 if ($url)
444 0 0 if ($self->id) { }
448 0 0 if ($return > 1 or not $return)
452 0 0 if (scalar @term_ids > 0 and @term_ids) { }
0 0 elsif (scalar @term_ids <= 0 or not @term_ids) { }
455 0 0 if (scalar @{$arr_ref;} > 0)
459 0 0 if ($$arr_val[0] == $term_ids[$i])
469 0 0 if ($return > 1 or not $return)
475 0 0 if (scalar @{$arr_ref;} > 0)
479 0 0 if ($$arr_val[0] == $term_ids[$i]) { }
486 0 0 unless ($found)
494 0 0 if ($return > 1 or not $return)
507 0 0 if ($return > 1 or not $return)
511 0 0 unless (not $$self{'term_ids'})
513 0 0 if (scalar @term_ids > 0 and @term_ids)
516 0 0 if ($return > 1 or not $return)
534 0 0 unless $$self{'librarian_id'}
539 0 0 if ($rv != 1)