6 use IPC::System::Simple qw(run);
8 die "Usage: ezpz-create-test-ezmlm-install ezmlm-source.tgz build-dir install-dir"
11 my ($ezmlm_tarball_path, $build_dir_path, $install_to_path) = @ARGV;
13 my $ezmlm_tarball = io->file(io->file($ezmlm_tarball_path)->rel2abs);
15 my $orig_cwd = io->dir(cwd);
17 my $build_dir = io->dir(io->dir($build_dir_path)->rel2abs);
18 my $install_to = io->dir(io->dir($install_to_path)->rel2abs);
20 unless ($build_dir->exists) {
23 run 'tar', 'xzf', $ezmlm_tarball;
27 my ($src_dir) = ($build_dir->all_dirs)[0];
29 die "No source dir found in ${build_dir}" unless $src_dir;
31 foreach my $type (qw(bin etc lib man qmail)) {
32 $src_dir->catfile("conf-${type}")->print($install_to->catdir($type)."\n");
41 $install_to->catdir('bin')->mkpath;
42 run make => 'install';