blib/lib/Config/Maker/Driver.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 20 | 75.0 |
line | true | false | branch |
---|---|---|---|
20 | 247 | 250 | if (ref $e eq 'CODE') { } |
0 | 250 | elsif (ref $e) { } | |
33 | 0 | 45 | unless UNIVERSAL::isa($config, 'Config::Maker::Config') |
49 | 2 | 43 | if $@ |
61 | 9 | 37 | if ($cache{$file}) |
63 | 9 | 0 | wantarray ? : |
66 | 0 | 37 | unless open $fh, '<', $file |
74 | 1 | 36 | if (substr($text, 0, 250) =~ /\[#[^#]*$Config::Maker::fenc([[:alnum:]_-]+)/ or substr($text, -250) =~ /\[#[^#]*$Config::Maker::fenc([[:alnum:]_-]+)/) |
82 | 0 | 37 | unless defined $out |
87 | 36 | 1 | wantarray ? : |