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
|
#!/usr/bin/perl
use strict;
use Module::Build;
my $build = Module::Build->new(
module_name => 'IO::Interface',
dist_version_from => 'lib/IO/Interface.pm',
dist_author => 'Lincoln Stein <lincoln.stein@gmail.com>',
dist_abstract => 'Access and modify network interface card configuration',
license => 'perl',
build_requires => {
'ExtUtils::CBuilder' => 0,
},
requires => {
'perl' => '5.005',
},
extra_compiler_flags => ['-DUSE_GETIFADDRS'],
);
$build->create_build_script();
# get rid of annoying warning from ExtUtils::ParseXS
my $sub = 's/\$\^W\s*=\s*1/\$^W = 0/';
system "perl -pi -e '$sub' Build";
exit 0;
|
