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}) { } |