| blib/lib/App/ape/update.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 30 | 0 | 4 | if $help |
| 32 | 1 | 3 | unless (scalar @args) |
| 40 | 1 | 2 | unless (scalar @{$options{'defects'};}) |
| 51 | 1 | 1 | if (scalar grep({my $subj = $_; grep {$subj eq $_;} 'server.host', 'server.port';} keys %$conf) != 2) |
| 84 | 1 | 0 | if $global_result |
| 86 | 1 | 0 | $global_result ? : |