Solves problem with Cache::BaseCache and paramters

lib/WWW/Mechanize/Cached.pm

@@ -44,10 +44,10 @@ sub _isa_warn_cache {
 sub _build_cache {
     my $self = shift;
 
-    return Cache::FileCache->new(
+    return Cache::FileCache->new({
         default_expires_in => '1d',
         namespace          => 'www-mechanize-cached',
-    ) if try_load_class 'Cache::FileCache';
+    }) if try_load_class 'Cache::FileCache';
     return CHI->new(
         driver     => 'File',
         expires_in => '1d',

t/default.t

@@ -0,0 +1,14 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+use Test::More tests => 1;
+
+BEGIN {
+    use_ok('WWW::Mechanize::Cached');
+}
+
+my $mech = WWW::Mechanize::Cached->new;
+
+$mech->get('http://www.wikipedia.com');