blib/lib/GeNUScreen/Config.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
34 | 0 | 2 | unless open my $fh, "<", $filename |
39 | 520 | 444 | if (/^\s*($re_cfgpath)\s*=\s*($re_cfgval)?$/) { } |
4 | 440 | elsif (/^\s*($re_cfgpath)\s*<<\s*($re_marker)$/) { } | |
220 | 220 | elsif (/^\s*($re_cfgvar)\s*\{\s*$/) { } | |
220 | 0 | elsif (/^\s*\}\s*$/) { } | |
47 | 4 | 120 | if /^$marker$/ |