| blib/lib/Test/Inline/Extract.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 14 | 64.2 |
| line | true | false | branch |
|---|---|---|---|
| 42 | 0 | 22 | unless my $class = &_CLASS(shift()) |
| 45 | 0 | 22 | unless my $source = $class->_source(shift()) |
| 60 | 0 | 22 | unless defined $_[0] |
| 61 | 21 | 1 | if &_SCALAR($_[0]) |
| 62 | 0 | 1 | if ref $_[0] |
| 112 | 22 | 0 | unless $_[0]{'elements'} |
| 121 | 19 | 3 | &List::Util::first(sub { /^=/; } , @elements) ? : |