| 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 $_; } , '->', ';')) |