blib/lib/Sort/MergeSort/Iterator.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 18 | 72.2 |
line | true | false | branch |
---|---|---|---|
18 | 1 | 163 | if ref $code ne 'CODE' |
19 | 0 | 163 | if $destroy and ref $destroy ne 'CODE' |
34 | 162 | 1 | unless my $dest = ${*$self;}{'destroy'} |
46 | 17 | 89057 | exists ${*$self;}{'peek'} ? : |
47 | 88909 | 165 | if defined ${*$self;}{'curr'} |
78 | 1 | 1 | wantarray ? : |
86 | 1 | 15 | unless &$code($_) |
95 | 0 | 0 | unless my $dest = ${*$self;}{'destroy'} |
134 | 0 | 0 | unless wantarray |