Branch Coverage

blib/lib/AnyEvent/MP/Config.pm

Criterion	Covered	Total	%
branch	2	16	12.5

line	true	false	branch
30	0	1	if (open my $fh, '<:raw', $CONFIG_FILE)
31	0	0	if eval { do { local $/; (%CFG) = %{'JSON::XS'->new->utf8->relaxed->decode(scalar <$fh>);}; 1 } }
44	1	0	unless delete $CFG{'dirty'}
46	0	0	unless open my $fh, '>:raw', "$CONFIG_FILE~new~"
49	0	0	unless syswrite $fh, 'JSON::XS'->new->pretty->utf8->encode(\%CFG) . "\n"
52	0	0	unless close $fh
57	0	0	unless rename "$CONFIG_FILE~new~", $CONFIG_FILE
69	0	0	if (defined $name) { }