Perl module to cache and expire key/value pairs

 Example:
 .
 my $h = new Cache::Simple::TimedExpiry;
 .
 $h->set(Forever => "Don't expire", 0);
 do {$h->set($_,"Value of $_", 1); sleep 2;} for qw(Have a nice day); $,=' ';
 print $h->elements; $h->dump; sleep 4; print $h->elements; $h->dump;