Branch Coverage

blib/lib/Tangerine/hook/moduleruntime.pm
Criterion Covered Total %
branch 6 6 100.0


line true false branch
14 2 80 if (&any(sub { $s->[0] eq $_; } , 'use', 'no') and scalar @$s > 1 and $s->[1] eq 'Module::Runtime')
21 3 137 if ($self->type eq 'runtime' and &any(sub { my $f = $_; &any(sub { $_ eq $f; } , @$s); } , @routines))
27 3 6 if (&any(sub { $s->[$clip] eq $_; } , '->', ';'))