blib/lib/Paranoid/Module.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 20 | 80.0 |
line | true | false | branch |
---|---|---|---|
75 | 19 | 2 | @args ? : |
78 | 0 | 21 | unless defined $module |
85 | 20 | 1 | unless (exists $modules{$module}) |
89 | 20 | 0 | if (&detaint(\$module, 'filename', \$m)) { } |
99 | 20 | 0 | unless (exists $modules{$module}) |
102 | 17 | 3 | eval "require $module; 1;" ? : |
110 | 19 | 2 | if (@args) { } |
111 | 10 | 9 | if $a eq 'qw()' |
119 | 18 | 3 | if ($modules{$module}) |
120 | 0 | 18 | if (exists $imports{$cm}) { } |