1 2use strict; 3use warnings; 4 5 6 7use ExtUtils::MakeMaker 6.31; 8 9 10 11my %WriteMakefileArgs = ( 12 'ABSTRACT' => 'BitTorrent serialisation format', 13 'AUTHOR' => 'Aristotle Pagaltzis <pagaltzis@gmx.de>', 14 'BUILD_REQUIRES' => { 15 'Test::More' => '0' 16 }, 17 'CONFIGURE_REQUIRES' => { 18 'ExtUtils::MakeMaker' => '6.31' 19 }, 20 'DISTNAME' => 'Bencode', 21 'EXE_FILES' => [], 22 'LICENSE' => 'perl', 23 'NAME' => 'Bencode', 24 'PREREQ_PM' => {}, 25 'VERSION' => '1.4', 26 'test' => { 27 'TESTS' => 't/*.t' 28 } 29); 30 31 32unless ( eval { ExtUtils::MakeMaker->VERSION(6.56) } ) { 33 my $br = delete $WriteMakefileArgs{BUILD_REQUIRES}; 34 my $pp = $WriteMakefileArgs{PREREQ_PM}; 35 for my $mod ( keys %$br ) { 36 if ( exists $pp->{$mod} ) { 37 $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod}; 38 } 39 else { 40 $pp->{$mod} = $br->{$mod}; 41 } 42 } 43} 44 45delete $WriteMakefileArgs{CONFIGURE_REQUIRES} 46 unless eval { ExtUtils::MakeMaker->VERSION(6.52) }; 47 48WriteMakefile(%WriteMakefileArgs); 49 50 51 52