Use new race infrastructure for members stats

[ndwebbie.git] / scripts / clean_cache.pl

diff --git a/scripts/clean_cache.pl b/scripts/clean_cache.pl
index 313bbe5c89d13347c5ce62f6fd0a6b0162695e14..e225199507dfb6b303802c9e502d5d412cb51b41 100755 (executable)
--- a/scripts/clean_cache.pl
+++ b/scripts/clean_cache.pl
@@ -3,12 +3,13 @@
 use strict;
 use warnings;
 
+use local::lib;
 use FindBin;
 use lib "$FindBin::Bin/../lib";
 
 use Cache::FileCache;
 
-my $cache = new Cache::FileCache({cache_root => "/tmp/ndweb-$<", namespace => 'cache'} );
+my $cache = Cache::FileCache->new({cache_root => "/tmp/ndweb-$<", namespace => 'cache'});
 
 $cache->purge;