sub read_cache { our %CACHE; ... } sub write_cache { our %CACHF; ... } #### { our %CACHE; sub read_cache { ... } sub write_cache { ... } }