| blib/lib/OptArgs2/SubCmd.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 20 | 55.0 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 4 | 0 | if exists &{$c . '::_NEW';} |
| 19 | 2 | 2 | if exists &{$c . '::BUILD';} |
| 21 | 0 | 4 | if (exists &{$c . '::DOES';}) |
| 28 | 5 | 0 | @_ > 1 ? : |
| 5 | 0 | @_ ? : | |
| 43 | 2 | 0 | @_CLASS > 1 ? : |
| 44 | 0 | 2 | if exists $OptArgs2::SubCmd::_FIELDS->{'FIELDS'} |
| 46 | 0 | 5 | if (my(@missing) = grep({not exists $_[0]{$_};} "parent")) |
| 59 | 0 | 20 | if @_ > 1 |
| 62 | 0 | 12 | if @_ > 1 |