use strict; use warnings; use ExtUtils::MakeMaker 6.30; my %WriteMakefileArgs = ( "ABSTRACT" => "Get XBox Live Gamercard information\r", "AUTHOR" => "Andrew Jones ", "BUILD_REQUIRES" => { "English" => 0, "FindBin" => 0, "Net::Ping" => 0, "Test::More" => "0.88", "Test::WWW::Mechanize" => 0 }, "CONFIGURE_REQUIRES" => { "ExtUtils::MakeMaker" => "6.30" }, "DISTNAME" => "WWW-XBoxLive", "EXE_FILES" => [], "LICENSE" => "perl", "NAME" => "WWW::XBoxLive", "PREREQ_PM" => { "HTML::TreeBuilder::XPath" => 0, "LWP::Simple" => 0, "Object::Tiny" => 0, "constant" => 0, "strict" => 0, "warnings" => 0 }, "VERSION" => "1.120580", "test" => { "TESTS" => "t/*.t" } ); unless ( eval { ExtUtils::MakeMaker->VERSION(6.56) } ) { my $br = delete $WriteMakefileArgs{BUILD_REQUIRES}; my $pp = $WriteMakefileArgs{PREREQ_PM}; for my $mod ( keys %$br ) { if ( exists $pp->{$mod} ) { $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod}; } else { $pp->{$mod} = $br->{$mod}; } } } delete $WriteMakefileArgs{CONFIGURE_REQUIRES} unless eval { ExtUtils::MakeMaker->VERSION(6.52) }; WriteMakefile(%WriteMakefileArgs);