Re: How to save and reload my hash

Also have a look at Cache::FileCache:

  my $hostname = 'foo.bar.example.com'
  use Cache::FileCache;
  my $cache = new Cache::FileCache( { 'namespace' => 'HostInfo',
                                      'default_expires_in' => 600 } );
  my $cacheKey = $hostname;
  my $host_info = $cache->get( $cacheKey );
  if ( not defined $host_info )
  {
    $customer = get_host_info_as_hashref( $hostname );
    $cache->set( $cacheKey, $host_info, "10 minutes" );
  }
  return $host_info;
[download]

Comment on Re: How to save and reload my hash Download Code

Replies are listed 'Best First'.
Re^2: How to save and reload my hash by lepetitalbert (Abbot) on Nov 20, 2005 at 15:16 UTC
Hello dear Monks, first thanks for you answers. I first tried : (cos it's the shortest) `use Storable; # fill my hash store \%host_info, 'file'; %host_info = (); %host_info = %{retrieve('file')}; # print my hash` [download] This worked. Don't know what I did yesterday, when I used `store \%host_info, 'file';` (probably not exactly that) It had a file with just `pst01234(and some unprintable chars).` [download] Maybe I should not code until 6am. Thank you all. Have a nice day ! "There is only one good, namely knowledge, and only one evil, namely ignorance." Socrates	[reply] [d/l] [select]
Re^3: How to save and reload my hash by Errto (Vicar) on Nov 20, 2005 at 17:28 UTC
The output that Storable produces is not meant to be human-readable. So it's probably true that whatever you were doing worked just fine. You just have to sort of trust (or test it) that when you read it back in using `retrieve` it'll come out ok.	[reply] [d/l]