Branch Coverage

blib/lib/Test/Instruction.pm
Criterion Covered Total %
branch 38 104 36.5


line true false branch
58 0 32 if $instruction->debug
65 0 32 if ($instruction->catch) { }
67 0 0 unless $instruction->exits->test
75 0 32 unless ($instruction->test)
81 0 32 if $instruction->debug
91 0 0 unless $instruction->key
103 0 0 unless $instruction->key
116 0 0 unless $instruction->key
127 0 2 unless defined $instruction->index
139 0 0 unless defined $instruction->index
150 0 0 unless defined $instruction->index
163 0 0 unless defined $instruction->index
175 0 0 unless defined $instruction->index
188 0 0 unless defined $instruction->index
199 0 0 unless defined $instruction->index
212 0 0 unless defined $instruction->index
224 0 0 unless $instruction->key
236 0 0 unless $instruction->key
247 0 0 unless $instruction->key
278 3 0 defined $instruction->expected ? :
282 5 0 scalar @test == 1 ? :
290 1 0 scalar @test == 1 ? :
316 0 2 $instruction->args ? :
357 0 8 if $instructions->debug
364 1 7 $instructions->build ? :
366 0 8 if $instructions->debug
380 0 17 if $instructions->debug
386 7 10 if (my $subtests = delete $instruction->{'instructions'})
391 0 7 $instructions->debug ? :
395 0 7 if $instructions->debug
407 0 7 $instructions->debug ? :
0 7 unless instruction("instance", $new_instance, "test", $instruction->{'test'}, $instructions->debug ? ("debug", $instructions->debug) : (), "expected", $instruction->{'expected'})
409 0 7 $instructions->debug ? :
422 0 10 $instructions->debug ? :
0 10 unless instruction("instance", $instance, $instructions->debug ? ("debug", $instructions->debug) : (), %{$instruction;})
426 0 8 $test_info{'fail'} ? :
447 0 1 defined $build->args ? :
0 1 $build->args_list ? :
452 13 26 if ($instruction->meth) { }
5 21 elsif ($instruction->func) { }
1 20 elsif ($instruction->ref_key) { }
3 17 elsif (defined $instruction->ref_index) { }
17 0 elsif ($instruction->instance) { }
458 0 13 $instruction->args_list ? :
466 2 3 $instruction->args_list ? :
492 0 0 if $caller[0] eq "Log::JSON::Lines"
494 0 0 if $caller[1] =~ m[([^/]+)$]
495 0 0 if $caller[2] =~ /(\d+)/
496 0 0 if $caller[3] =~ /([^:]+)$/
499 0 0 !($_->{'module'} =~ /^main$/) ? :
503 0 0 $_->{'sub'} ? :
505 0 0 if $_ and $_->{'module'} and $_->{'line'}