| blib/lib/List/MRU.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 25 | 32 | 78.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 18 | 4 | 1 | 2 | $arg{'eq'} and ref $arg{'eq'} ne 'CODE' |
| 54 | 11 | 8 | 0 | $self->uuid and not defined $uuid |
| 73 | 1 | 22 | 0 | $item and $item eq 'item' || $item eq 'uuid' |
| 82 | 18 | 0 | 16 | $self->uuid and $uuid |
| 18 | 11 | 5 | $self->uuid and $uuid and $$self{'ulist'}[$i] eq $uuid | |
| 0 | 23 | 6 | $item and &$eq($item, $$self{'list'}[$i]) | |
| 86 | 11 | 0 | 0 | wantarray && $self->uuid |
| line | l | !l | condition |
|---|---|---|---|
| 80 | 3 | 19 | $$self{'eq'} || sub { $_[0] eq $_[1]; } |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 73 | 20 | 1 | 1 | $item eq 'item' || $item eq 'uuid' |
| 79 | 21 | 1 | 1 | defined $item or defined $uuid |
| 82 | 5 | 0 | 29 | $self->uuid and $uuid and $$self{'ulist'}[$i] eq $uuid or $item and &$eq($item, $$self{'list'}[$i]) |