system('make install');
}
$self->SUPER::ACTION_build();
};
1;
几乎就是调用 shell 而已,唯一需要讲一下的就是这个 ACTION_build。这是 Module::Build 定义好的提供给 subclass 用的方法,事实上 ./Build help 看得到的所有 action 都有类似的方法可以用。
然后稍微修改一下 Build.PL 如下:
use 5.006;
use strict;
use warnings FATAL => 'all';
use lib 'inc';
use Alien::FPing::Build;
my $builder = Alien::FPing::Build->new(
module_name => 'Alien::FPing',
license => 'perl',
dist_author => q{Jeff Rao <myname@gmail.com>},
dist_version_from => 'lib/Alien/FPing.pm',
release_status => 'stable',
configure_requires => {
'Module::Build' => 0,
},
build_requires => {
'Test::More' => 0,
},
requires => {
#'ABC' => 1.6,
#'Foo::Bar::Module' => 5.0401,
},
add_to_cleanup => [ 'Alien-FPing-*' ],
create_makefile_pl => 'traditional',
);
$builder->create_build_script();
把 Module::Build 替换成 Alien::FPing::Build 而已,其他都不用动。
然后试一下吧:
cd Alien-FPing
perl Build.PL
./Build
看到编译输出,并且成功安装有 /usr/sbin/fping 了吧。现在可以打包了。注意默认生成的 ignore.txt 里,是排除掉了 inc 目录的,需要去除掉,然后修改 MANIFEST 文件加入 inc 和 src 里的文件,然后再打包出来的 perl 模块就可以直接用了。









