| lib/Config/Parser/Ini.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 26 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 28 | 9 | 11 | unless ($fh) |
| 30 | 0 | 9 | unless (open $fh, '<', $file) |
| 45 | 0 | 135 | if (/\\$/) |
| 54 | 19 | 116 | if $_ eq '' |
| 58 | 37 | 79 | if (/^\[(.+?)\]$/) { } |
| 79 | 0 | elsif (/([\w_-]+)\s*=\s*(.*)/) { } | |
| 60 | 0 | 37 | if (@path == 1 and $path[0] eq 'include') { } |
| 70 | 0 | 79 | if ($include) { } |
| 71 | 0 | 0 | if ($k eq 'path') { } |
| 0 | 0 | elsif ($k eq 'pathopt') { } | |
| 0 | 0 | elsif ($k eq 'glob') { } | |
| 74 | 0 | 0 | if -f $v |
| 91 | 9 | 11 | if $need_close |