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)