| inc/Pegex/Base.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 23 | 40 | 57.5 |
| line | true | false | branch |
|---|---|---|---|
| 5 | 0 | 584 | $#_ ? : |
| 7 | 0 | if not exists $$s{$_} | |
| 1 | 0 | !exists($_[0]{$n}) ? : | |
| 0 | 1 | $#_ ? : | |
| 5 | 15 | unless $#_ % 2 | |
| 0 | 7 | unless exists $a{$n} | |
| 4 | 16 | if ($a{'required'}) | |
| 15 | 5 | unless exists $a{'default'} | |
| 0 | 4 | 'CODE' eq $r ? : | |
| 1 | 4 | 'ARRAY' eq $r ? : | |
| 0 | 5 | 'HASH' eq ($r = ref $d) ? : | |
| 0 | 5 | exists $a{'lazy'} ? : | |
| 5 | 0 | unless $i | |
| 0 | 0 | !exists($_[0]{$n}) ? : | |
| 0 | 0 | $#_ ? : | |
| 18 | 2 | unless my $b = $a{'builder'} | |
| 2 | 0 | exists $a{'lazy'} ? : | |
| 0 | 2 | unless $i | |
| 6 | 0 | @_ == 1 ? : | |
| 0 | 6 | @_ == 2 && !$_[1] ? : |