| lib/Spoon/Config.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 22 | 22.7 |
| line | true | false | branch |
|---|---|---|---|
| 15 | 0 | 4 | /\*/ ? : |
| 16 | 4 | 1 | @_ ? : |
| 33 | 9 | 0 | ref $config ? : |
| 45 | 0 | 4 | if (defined(my $config_class = $$hash{'config_class'})) |
| 46 | 0 | 0 | if $@ |
| 53 | 0 | 0 | unless $config =~ /\.(\w+)$/ |
| 57 | 0 | 0 | -f $config ? : |
| 74 | 0 | 0 | if /^#/ |
| 75 | 0 | 0 | if (/^-\s*(.*)$/) { } |
| 0 | 0 | elsif (/(.*?)\s*:\s+(.*?)\s*$/ or /(.*?):()\s*$/) { } | |
| 76 | 0 | 0 | unless ref $$hash{$latest_key} |