Branch Coverage

blib/lib/Pegex/Forth.pm

Criterion	Covered	Total	%
branch	4	10	40.0

line	true	false	branch
13	0	0	if (@$args) { }
14	0	0	if (-f $$args[0]) { }
15	0	0	unless open my $fh, $$args[0]
38	4	33	unless @$values
39	31	2	wantarray ? :