Branch Coverage

blib/lib/Tangerine/hook/testrequires.pm
Criterion Covered Total %
branch 13 18 72.2


line true false branch
14 6 142 if ($self->type eq 'compile' and &any(sub { $s->[0] eq $_; } , 'use', 'no') and scalar @$s > 2 and &any(sub { $s->[1] eq $_; } , 'Test::Needs', 'Test::Requires')) { }
4 138 elsif ($self->type eq 'runtime' and &any(sub { $s->[0] eq $_; } , 'test_needs', 'test_requires') and scalar @$s > 1) { }
19 0 6 if not $version and stripquotelike($s->[2]) =~ /^v?5(?:\..*)?$/
20 0 6 $version ? :
22 6 0 if (scalar @$s > $voffset)
23 0 6 if $s->[$voffset] eq ';'
28 2 4 if (substr($s->[$voffset], 0, 1) eq '{') { }
35 0 4 if $s->[1] eq ';'
37 2 2 $args[1] && $args[1] ne ';' ? :