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]) |