sub read_cache {
  our %CACHE;
  ...
}

sub write_cache {
  our %CACHE;
  ...
}