Branch Coverage

blib/lib/App/ape/plan.pm
Criterion Covered Total %
branch 39 74 52.7


line true false branch
40 0 4 if $help
42 1 3 unless ($options{'version'})
50 1 0 if ($options{'prompt'} and $options{'show'})
62 1 1 if (scalar grep({my $subj = $_; grep {$subj eq $_;} 'server.host', 'server.port';} keys %$conf) != 2)
81 0 0 unless (scalar @{$options{'platforms'};} or $options{'allplatforms'})
98 1 0 if $options{'exts'}
121 1 4 if ($self->{'options'}{'show'})
122 0 1 if $self->{'options'}{'replay'}
132 3 1 if ($self->{'options'}{'prompt'})
134 2 1 if (not $plan->{'noop'}) { }
135 0 2 unless IO::Prompter::prompt('Do you want to enact the above changes?')
141 1 0 unless $self->{'options'}{'requeue'}
155 3 0 if not $plan->{'noop'} or $self->{'options'}{'requeue'}
157 1 4 if $global_result
159 1 4 if $queue_result
161 1 4 $global_result ? :
171 0 0 if (scalar @{$options{'platforms'};} and not $options{'allplatforms'})
178 0 0 unless scalar @{$conf->{$grp};}
183 0 0 if (scalar @pgroups) { }
186 0 0 if ($options{'pairwise'}) { }
197 0 0 if scalar @{$conf->{$pgroup};} > scalar @{$conf->{$longest};}
216 0 0 if $picked
221 0 0 unless scalar @tests_apportioned
239 0 0 if ref $subj ne 'ARRAY'
242 0 0 if (scalar @$subj == scalar @pigeonholes)
278 1 1 if (not $existing) { }
289 6 1 if (not $plan->{'noop'} or $force) { }
290 6 0 if $plan->{'name'}
294 6 0 $plan->{'pairwise'} ne 'false' ? :
297 4 2 if ($plan->{'state'}) { }
299 2 0 if ($plan->{'replay'} and $t->{'body'})
302 0 2 if scalar @{$plan->{'replay'};} and not grep({$_ eq $t->{'name'};} @{$$plan{'replay'};})
305 2 0 if $t->{'test_version'}
311 4 4 if ($t->{'status'} ne 'UNTESTED' and ref $t->{'steps'} eq 'ARRAY')
323 2 0 if ($plan->{'update'})
324 2 0 if (ref $plan->{'update'}{'subtraction'}{'tests'} eq 'ARRAY')
331 2 0 if (ref $plan->{'update'}{'addition'}{'tests'} eq 'ARRAY')