| blib/lib/UNIVERSAL/require.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 87 | 0 | 10 | if ref $module |
| 90 | 1 | 9 | unless $module =~ /\A$module_name_rx\z/ |
| 92 | 0 | 9 | if @_ > 2 |
| 103 | 3 | 6 | if $INC{$file} |
| 111 | 2 | 4 | unless ($return) |
| 117 | 2 | 2 | if (@_ == 2) |
| 122 | 1 | 1 | unless (eval qq[\n#line $call_line "$call_file"\n\$module->VERSION($want_version);\n1;\n]) |
| 154 | 1 | 3 | unless my $return = $module->require |
| 163 | 1 | 2 | unless (eval qq[\npackage $call_package;\n#line $call_line "$call_file"\n\$module->import(\@imports);\n1;\n]) |