line |
true |
false |
branch |
28
|
0 |
0 |
unless ($ok_to_compress) |
40
|
0 |
0 |
unless $cache->get($_[0]) or do {
my $ret;
$cache->set($_[0], $ret = ref $_[1] eq 'CODE' ? $_[1]->() : $_[1]);
$ret
} |
42
|
0 |
0 |
ref $_[1] eq 'CODE' ? : |
50
|
0 |
0 |
if $#_ == 0 and not ref $_[0] |
51
|
0 |
0 |
ref $_ eq 'ARRAY' ? : |
|
0 |
0 |
if ref $_ |
55
|
0 |
0 |
if $#_ == 0 and not ref $_[0] |
56
|
0 |
0 |
ref $_ eq 'ARRAY' ? : |
|
0 |
0 |
if ref $_ |
60
|
0 |
0 |
ref $_[1] eq 'CODE' ? : |
|
0 |
0 |
defined $_[2] ? : |
|
0 |
0 |
if ref $_[0] ne 'ARRAY' |
65
|
0 |
0 |
ref $$_[1] eq 'CODE' ? : |
|
0 |
0 |
defined $$_[2] ? : |
76
|
0 |
0 |
ref $_[1] eq 'CODE' ? : |
|
0 |
0 |
defined $_[2] ? : |
|
0 |
0 |
if ref $_[0] ne 'ARRAY' |
81
|
0 |
0 |
ref $$_[1] eq 'CODE' ? : |
|
0 |
0 |
defined $$_[2] ? : |
92
|
0 |
0 |
ref $_[1] eq 'CODE' ? : |
|
0 |
0 |
defined $_[2] ? : |
|
0 |
0 |
if ref $_[0] ne 'ARRAY' |
97
|
0 |
0 |
ref $$_[1] eq 'CODE' ? : |
|
0 |
0 |
defined $$_[2] ? : |
108
|
0 |
0 |
if $#_ == 0 and not ref $_[0] |
110
|
0 |
0 |
ref $_ && ref $_ eq 'ARRAY' ? : |
116
|
0 |
0 |
if $#_ == 1 and not ref $_[0] and not ref $_[1] |
124
|
0 |
0 |
if $#_ == 1 and not ref $_[0] and not ref $_[1] |
133
|
0 |
0 |
if $#_ <= 2 and scalar grep({not ref $_;} @_) |
141
|
0 |
0 |
if $#_ <= 2 and scalar grep({not ref $_;} @_) |