view release on metacpan or  search on metacpan

xt/author/pod_link.t  view on Meta::CPAN

  push @checks, 'blib';
}
else
{
  push @checks, 'lib';
  diag "checking lib instead of blib";
}

my $dir = path('~/.xor/cache');
$dir->mkpath;
$dir->chmod(0700);
my $ua = HTTP::Tiny::Mech->new(
  mechua => WWW::Mechanize::Cached->new(
    cache => CHI->new(
      # keep cache around for 24hrs
      expires_in => 60*60*24,
      driver     => 'File',
      root_dir   => $dir->stringify,
    ),
  ),
);