Branch Coverage

blib/lib/WWW/LogicBoxes/Contact/Factory.pm

Criterion	Covered	Total	%
branch	3	4	75.0

line	true	false	branch
23	0	7	if ($response->{'type'} eq 'CaContact') { }
	1	6	elsif (grep {$_ eq 'domus';} @{$$response{'contacttype'};} and exists $response->{'ApplicationPurpose'} and exists $response->{'NexusCategory'}) { }