Branch Coverage

blib/lib/Class/Business/DK/CVR.pm

Criterion	Covered	Total	%
branch	8	8	100.0

line	true	false	branch
24	5	1	if ($number) { }
42	7	1	if ($unvalidated_cvr) { }
43	1	6	unless eval { do { $rv = validate($unvalidated_cvr); 1 } }
45	2	5	if ($Class::Business::DK::CVR::EVAL_ERROR or not $rv) { }