Your IP : 216.73.216.74

Current Path : /proc/thread-self/root/usr/share/doc/perl-Symbol-Util/xt/
Upload File :
Current File : //proc/thread-self/root/usr/share/doc/perl-Symbol-Util/xt/cover.pl

#!/usr/bin/perl

use 5.008;
use strict;
no warnings;

use File::Basename;
use File::Spec;
use Cwd;

BEGIN {
    chdir dirname(__FILE__) or die "$!";
    chdir '..' or die "$!";
};

do "./Build.PL";

local @ARGV = (@ARGV, 'testcover');
do "./Build";