1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
#!/usr/bin/perl -w
BEGIN {
unshift @INC, 't/lib';
}
use strict;
use File::Spec;
use File::Temp qw[tempdir];
use MakeMaker::Test::Setup::PL_FILES;
use MakeMaker::Test::Utils;
use Config;
use Test::More;
use ExtUtils::MM;
plan !MM->can_run(make()) && $ENV{PERL_CORE} && $Config{'usecrosscompile'}
? (skip_all => "cross-compiling and make not available")
: (tests => 9);
my $perl = which_perl();
my $make = make_run();
perl_lib();
my $tmpdir = tempdir( DIR => 't', CLEANUP => 1 );
chdir $tmpdir;
setup;
END {
ok( chdir File::Spec->updir );
ok( teardown );
}
ok chdir('PL_FILES-Module');
run(qq{$perl Makefile.PL});
cmp_ok( $?, '==', 0 );
my $make_out = run("$make");
is( $?, 0 ) || diag $make_out;
foreach my $file (qw(single.out 1.out 2.out blib/lib/PL/Bar.pm)) {
ok( -e $file, "$file was created" );
}
|
