Scroll to navigation

Cache::Simple::TimedExpiry(3pm) User Contributed Perl Documentation Cache::Simple::TimedExpiry(3pm)
 

NAME

Cache::Simple::TimedExpiry - simple, time-expiring cache
 
EXAMPLE
 package main;
 use strict; 
 use warnings;
 $,=' '; $|++;
 use Cache::Simple::TimedExpiry;
 my $h =  Cache::Simple::TimedExpiry->new;
 $h->set( DieQuick => "No duration!", 0); 
 print $h->elements;
 do { $h->set($_,"Value of $_", 1); sleep 2;} 
    for qw(Have a nice day you little monkey);
 print $h->elements; $h->dump; sleep 4; print $h->elements; $h->dump;
 print time;
 
new
Set up a new cache object
 
expire_after SECONDS
Set the cache's expiry policy to expire entries after SECONDS seconds. Setting this changes the expiry policy for pre-existing cache entries and for new ones.
 
has_key KEY
Return true if the cache has an entry with the key KEY
 
fetch KEY
Return the cache entry with key KEY. Returns undef if there is no such entry
(Can also be called as get)
 
store KEY VALUE
Store VALUE in the cache with accessor KEY. Expire it from the cache at or after EXPIRYTIME.
(Can also be called as set)

AUTHOR

Jesse Vincent <jesse@bestpractical.com> Some of the heavy lifting was designed by Robert Spier <rspier@pobox.com>
Copyright 2004 Jesse Vincent <jesse@bestpractical.com>
2008-03-06 perl v5.8.8