| blib/lib/Test/Some.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 28 | 30 | 93.3 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 2 | 6 | unless @filters |
| 28 | 0 | 8 | unless my $original_subtest = 'main'->can('subtest') |
| 49 | 3 | 29 | if ($filter eq '~') |
| 54 | 5 | 24 | if $filter =~ s/^:// |
| 57 | 2 | 22 | if $filter =~ s/^!// |
| 60 | 7 | 15 | if $filter =~ s[^/][] |
| 65 | 7 | 6 | if (ref $filter) |
| 67 | 3 | 0 | if $key =~ /$filter/ |
| 74 | 22 | 8 | ref $filter ? : |
| 5 | 9 | $is_tag ? : | |
| 1 | 14 | ref $filter eq 'CODE' ? : | |
| 76 | 2 | 13 | if ($is_negated) |
| 90 | 19 | 27 | if &$filter() |
| 100 | 7 | 19 | if (_should_be_skipped($caller, $name, @tags)) |
| 101 | 3 | 4 | if $BYPASS |