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