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