Branch Coverage

blib/lib/Acme/Scurvy/Whoreson/BilgeRat.pm
Criterion Covered Total %
branch 10 14 71.4


line true false branch
48 1 2 unless $class and join('', keys %params) =~ /^(language)?$/
56 0 2 if $@
59 0 2 unless $backend and $backend->isa("Acme::Scurvy::Whoreson::BilgeRat::Backend::$params{'language'}")
77 5 0 uc $element eq 'A' ? :
4 5 uc $element eq 'N' ? :
79 0 9 if ++$counter == 100
82 5 4 $insult ? :