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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
use strict;
use warnings;
use Module::Build 0.3601;
my %module_build_args = (
"build_requires" => {
"Module::Build" => "0.3601"
},
"configure_requires" => {
"ExtUtils::MakeMaker" => "6.30",
"Module::Build" => "0.3601"
},
"dist_abstract" => "Cross-platform path specification manipulation",
"dist_author" => [
"Ken Williams <kwilliams\@cpan.org>"
],
"dist_name" => "Path-Class",
"dist_version" => "0.35",
"license" => "perl",
"module_name" => "Path::Class",
"recommends" => {},
"recursive_test_files" => 1,
"requires" => {
"Carp" => 0,
"Cwd" => 0,
"Exporter" => 0,
"File::Copy" => 0,
"File::Path" => 0,
"File::Spec" => "3.26",
"File::Temp" => 0,
"File::stat" => 0,
"IO::Dir" => 0,
"IO::File" => 0,
"Perl::OSType" => 0,
"Scalar::Util" => 0,
"overload" => 0,
"parent" => 0,
"strict" => 0
},
"script_files" => [],
"test_requires" => {
"Test" => 0,
"Test::More" => 0,
"warnings" => 0
}
);
my %fallback_build_requires = (
"Module::Build" => "0.3601",
"Test" => 0,
"Test::More" => 0,
"warnings" => 0
);
unless ( eval { Module::Build->VERSION(0.4004) } ) {
delete $module_build_args{test_requires};
$module_build_args{build_requires} = \%fallback_build_requires;
}
my $build = Module::Build->new(%module_build_args);
$build->create_build_script;
|