Branch Coverage

File:blib/lib/Class/Simple/Readonly/Cached.pm
Coverage:98.4%

line%coveragebranch
200100TFunless (defined $class)
206100TFif (&blessed($class))
211100TFif (exists $params->{'cache'})
220100TFif (&blessed($$params{'cache'})) { }
100TFelsif (ref $$params{'cache'} ne 'HASH') { }
221100TFunless ($$params{"cache"}->can("get") and $$params{"cache"}->can("set") and $$params{"cache"}->can("purge"))
231100TFif (defined $$params{'object'}) { }
232100TFunless (ref $$params{"object"})
236100TFif (ref $$params{"object"} eq __PACKAGE__)
253100TFif (my $existing = $cached{$$params{"object"}})
254100TFunless ($$params{"quiet"})
388100TFif $method eq "new"
394100TFunless ref $self and ref $$self{"object"}
443100TFif $class eq ref $self or $class eq __PACKAGE__ or $class eq "Class::Simple" or $self->SUPER::isa($class)
470100TFif (ref $c eq 'HASH') { }
490100TFif $r
553100TFif ($method eq "DESTROY")
55650TFif defined $^V and $^V ge "v5.14.0" and ${^GLOBAL_PHASE} eq "DESTRUCT"
560100TFif ref $$self{"object"}
562100TFif ($cache)
563100TFif ($$self{'_cache_is_hash'}) { }
579100TFif @_
587100TFif (defined $cached_val)
595100TFif (ref $cached_val eq "ARRAY")
599100TF$wantlist ? :
601100TFif ($cached_val eq $UNDEF_SENTINEL)
607100TFunless ($wantlist)
624100TFif ($wantlist)
626100TFunless (@result)
637100TFif _can_fixate(@result)
643100TFunless (defined $result)