4 if( $ENV{PERL_CORE} ) {
6 @INC = ('../lib', 'lib');
16 use Test::More tests => 1;
17 use MakeMaker::Test::Utils;
18 use ExtUtils::MakeMaker;
24 mkdir('Odd-Version', 0777);
25 END { chdir File::Spec->updir; rmtree 'Odd-Version' }
28 open(MPL, ">Version") || die $!;
29 print MPL "\$VERSION = 0\n";
31 END { unlink 'Version' }
33 my $stdout = tie *STDOUT, 'TieOut' or die;
34 my $mm = WriteMakefile(
36 VERSION_FROM => 'Version'
39 is( $mm->{VERSION}, 0, 'VERSION_FROM when $VERSION = 0' );