Branch Coverage

blib/lib/Module/Changes/ADAMK.pm

Criterion	Covered	Total	%
branch	9	24	37.5

line	true	false	branch
61	0	4	unless my $file = shift()
62	0	4	unless -e $file
63	0	4	unless -f _
64	0	4	unless -r _
68	0	4	unless open CFG, $file
85	0	5	unless defined $string
103	0	5	unless (@header_words)
109	5	0	if ($name =~ /-/) { }
	0	0	elsif ($name =~ /::/) { }
118	0	86	unless $paragraph =~ /\S/
132	0	0	unless ($$self{'file'})
137	0	0	unless open CFG, '>', $$self{'file'}