Branch Coverage

blib/lib/App/Spec/Run.pm
Criterion Covered Total %
branch 61 80 76.2


line true false branch
55 29 1 unless ($argv)
65 30 0 unless ($self->op)
72 27 3 unless ($self->response->halted)
81 14 13 unless ($ok)
84 9 5 unless ($completion_parameter)
90 18 12 unless ($self->response->halted)
94 5 13 if ($completion_parameter) { }
125 13 8 unless ref $text or $text =~ /\n\z/
131 1 27 unless ref $text or $text =~ /\n\z/
146 0 0 if (my $exit = $res->exit)
156 1 4 unless my $shell = $ENV{'PERL5_APPSPECRUN_SHELL'}
160 0 4 unless my $completion = $param->completion
162 2 2 if (ref $completion) { }
163 0 2 unless $op = $completion->{'op'}
166 0 2 unless my $possible_values = $param->values
167 0 2 unless $op = $possible_values->{'op'}
177 2 2 if ($unique)
180 0 2 unless XXX
190 2 7 if (ref $item eq 'HASH') { }
192 0 2 if $unique and $seen{$name}++
197 1 6 if $unique and $seen{$item}++
212 9 0 if ($key eq 'parameters' or $key eq 'options') { }
243 0 0 unless (defined wantarray)
249 0 16 $self->colorize($out) ? :
254 0 31 if (($ENV{'PERL5_APPSPECRUN_COLOR'} // '') eq 'always')
257 29 2 if (($ENV{'PERL5_APPSPECRUN_COLOR'} // '') eq 'never')
260 0 2 if ($out eq 'out' and -t STDOUT or $out eq 'err' and -t STDERR)
277 10 32 if ($multiple) { }
317 2 33 unless (defined $cmd)
318 1 1 if (not $op or $subcommand_required)
331 2 31 unless ($cmd_spec = $commands->{$cmd})
349 25 6 if $cmd_spec->op
350 3 28 if $cmd_spec->class
358 27 3 unless ($self->response->halted)
359 1 26 unless ($op)
360 0 1 if ($spec->has_subcommands) { }
375 26 1 if ($op =~ /^::/)
392 15 0 $_ eq 'error' ? :
394 0 15 if $self->colorize($out)
403 0 56 unless exists $EVENTS{$event}