| blib/lib/Config/Backend/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 24 | 26 | 92.3 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 1 | 10 | unless open my $in, "<$filename" |
| 21 | 10 | 1 | if ($open) |
| 35 | 8 | 745 | if (substr($str, $i, 3) eq "\n%#") { } |
| 10 | 735 | elsif (substr($str, $i, 3) eq "\n%%") { } | |
| 33 | 702 | elsif (substr($str, $i, 2) eq "\n%") { } | |
| 36 | 8 | 0 | if ($k != $i) |
| 44 | 33 | 0 | if ($k != $i) |
| 53 | 10 | 1 | if ($k != $i) |
| 59 | 12 | 39 | if ($item =~ /^%#/) { } |
| 95 | 4 | 72 | unless ($$self{'changed'}) |
| 107 | 21 | 576 | if ($var =~ /^%#/) { } |
| 131 | 29 | 10 | unless (exists $$self{'conf'}{$var}) |
| 154 | 217 | 24 | if ($elem ne $var) |