| lib/Perl/PrereqScanner/NotQuiteLite/Parser/ClassAutouse.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 2 | if (is_version($tokens->[0])) |
| 22 | 2 | 1 | if (ref $module) |
| 25 | 1 | 2 | if (is_module_name($module)) |
| 42 | 0 | 1 | unless $klass and ref $klass and $klass->[0] eq $used_module |
| 43 | 0 | 1 | unless $method and ref $method and $method->[0] eq "autouse" |
| 45 | 1 | 1 | if ref $arg |