Commit | Line | Data |
75e2e551 |
1 | #!/usr/bin/perl -w |
2 | |
3 | # This test puts MakeMaker through the paces of a basic perl module |
4 | # build, test and installation of the Big::Fat::Dummy module. |
5 | |
6 | BEGIN { |
7 | if( $ENV{PERL_CORE} ) { |
8 | chdir 't' if -d 't'; |
9 | @INC = ('../lib', 'lib'); |
10 | } |
11 | else { |
12 | unshift @INC, 't/lib'; |
13 | } |
14 | } |
15 | |
4954abf7 |
16 | # The test logic is shared between MakeMaker and Install |
17 | # because in MakeMaker we test aspects that we are uninterested |
18 | # in with Install.pm, however MakeMaker needs to know if it |
19 | # accidentally breaks Install. So we have this two stage test file |
20 | # thing happening. |
21 | |
22 | # This version is distinct to MakeMaker and the core. |
23 | |
24 | use vars qw/$TESTS $TEST_INSTALL_ONLY/; |
25 | use Cwd qw(cwd); |
26 | |
27 | $::TESTS= 55 + 30; |
28 | $::TEST_INSTALL_ONLY= 0; |
29 | |
30 | (my $start=$0)=~s/\.t$/.pl/; |
31 | (my $finish=$start)=~s/\.pl$/_finish.pl/; |
32 | my $code; |
33 | for my $file ($start,$finish) { |
34 | open my $fh,$file or die "Failed to read: $file"; |
35 | $code .= do { |
36 | local $/; |
37 | <$fh>; |
38 | }; |
39 | close $fh; |
40 | $code .= "\n;\n"; |
41 | } |
42 | eval $code or die $@,$code; |
479d2113 |
43 | |