view release on metacpan or  search on metacpan

xt/cover.pl  view on Meta::CPAN

8
9
10
11
12
13
14
15
16
17
18
19
use File::Spec;
use Cwd;
 
BEGIN {
    chdir dirname(__FILE__) or die "$!";
    chdir '..' or die "$!";
};
 
do "./Build.PL";
 
local @ARGV = (@ARGV, 'testcover');
do "./Build";