Branch Coverage

blib/lib/Rose/DB/Object/Cached.pm
Criterion Covered Total %
branch 8 52 15.3


line true false branch
35 0 0 $ttl_secs ? :
39 0 0 if ($ttl_secs)
50 0 0 defined $_ ? :
56 0 0 if ($ttl_secs)
74 0 0 if (@_ == 2) { }
81 0 0 if (do { "${class}::Objects_By_Id" }->{$pk})
83 0 0 if ($ttl_secs and time - do { "${class}::Objects_By_Id_Loaded" }->{$pk} >= $ttl_secs)
101 0 0 if (do { "${class}::Objects_By_Key" }->{$key_name}{$key_value})
103 0 0 if ($ttl_secs and time - do { "${class}::Objects_By_Key_Loaded" }->{$key_name}{$key_value} >= $ttl_secs)
123 0 0 unless (delete $args{'refresh'})
129 0 0 if ($object) { }
0 0 elsif (not defined $object && $object == 0) { }
144 0 0 defined $_ ? :
147 0 0 if (my $object = __xrdbopriv_get_object($_[0], $key_name, $key_value))
158 0 0 if $ret
168 0 0 unless $ret
180 0 0 unless $ret
191 0 0 if $ret
248 0 0 if defined wantarray
271 0 0 if ($class->cached_objects_expire_in)
284 28 168 if ref $class
287 112 84 unless @_
293 0 84 if ($arg =~ /^now$/i) { }
0 84 elsif ($arg =~ /^never$/) { }
0 84 elsif ($arg =~ /^\s*([+-]?(?:\d+|\d*\.\d*))\s*$/) { }
84 0 elsif ($arg =~ /^\s*([+-]?(?:\d+(?:\.\d*)?|\d*\.\d+))\s*(\w*)\s*$/ and exists $Expiration_Units{$2}) { }