| blib/lib/Paranoid/Module.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 75 | 42 | 2 | @args ? : |
| 78 | 0 | 44 | unless defined $module |
| 84 | 43 | 1 | unless (exists $modules{$module}) |
| 88 | 43 | 0 | if (&detaint(\$module, 'filename', \$m)) { } |
| 98 | 43 | 0 | unless (exists $modules{$module}) |
| 101 | 40 | 3 | eval "require $module; 1;" ? : |
| 109 | 42 | 2 | if (@args) { } |
| 110 | 16 | 26 | if $a eq "qw()" |
| 118 | 41 | 3 | if ($modules{$module}) |
| 119 | 0 | 41 | if (exists $imports{$cm}) { } |