Select Code to Download

if ( exists $self->foo_cache()->{$key} ) { # cache hit
    $value = $self->foo_cache()->{$key};
...
    $value = calculate_something_worth_caching();
    $self->foo_cache()->{$key} = $value; # store in cache
}