Branch Coverage

blib/lib/PerlX/Define.pm

Criterion	Covered	Total	%
branch	6	8	75.0

line	true	false	branch
21	3	3	if (@_)
26	0	3	ref $value ? :
38	1	2	$@ ? :
44	0	3	unless my($whitespace1, $name, $whitespace2, $equals) = $$line =~ /\A([\n\s]*)(\w+)([\n\s]*)(=\>?)/su