| blib/lib/File/KDBX/Iterator.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 35 | 42 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 810 | 8 | XXX ? : |
| 24 | 0 | 818 | @_ == 1 && XXX ? : |
| 26 | 25 | 1958 | if (@_) { } |
| 27 | 22 | 3 | if (@_ == 1 and XXX) { } |
| 37 | 99 | 1859 | if defined $next |
| 46 | 838 | 329 | unless my $code = shift() |
| 51 | 18 | 313 | if &$code($_) |
| 61 | 1 | 1 | if defined $next |
| 74 | 4 | 23 | unless my $cb = shift() |
| 76 | 23 | 0 | if (XXX) { } |
| 0 | 0 | elsif (not XXX) { } | |
| 95 | 28 | 26 | if &$code($_) |
| 108 | 19 | 93 | unless defined $_ |
| 124 | 1 | 4 | if ($collate and not $case) |
| 132 | 3 | 2 | $case ? : |
| 5 | 0 | unless XXX | |
| 135 | 1 | 4 | if ($collate) { } |
| 137 | 1 | 0 | if ($ascending) { } |
| 143 | 2 | 2 | if ($ascending) { } |
| 166 | 2 | 0 | unless XXX |
| 169 | 1 | 1 | if ($ascending) { } |