Branch Coverage

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


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