Branch Coverage

blib/lib/App/MyPerl/Role/Script.pm

Criterion	Covered	Total	%
branch	6	10	60.0

line	true	false	branch
34	1	1	if (my $env = $self->env_home) { }
	1	0	elsif ($env = $ENV{'HOME'}) { }
102	0	5	if ($mod =~ /^-/)
106	2	3	$arg ? :
122	0	0	if caller 1