Help for this page

Select Code to Download

Select or download this

sub CheckCache
{
...
    # no reason to play this game every time
    goto &$sub;
}

Select or download this

my $cache = new Cache::Cache;
$cache->CheckCache("key",\&sub,$time);  # Object oriented
...
Or

Cache::CheckCache("key",\&sub,$time); # in non OO