perl Tie-Cache