aboutsummaryrefslogtreecommitdiffstats
path: root/perl-external/bin/build_all_modules.pl
diff options
context:
space:
mode:
Diffstat (limited to 'perl-external/bin/build_all_modules.pl')
-rw-r--r--perl-external/bin/build_all_modules.pl40
1 files changed, 0 insertions, 40 deletions
diff --git a/perl-external/bin/build_all_modules.pl b/perl-external/bin/build_all_modules.pl
deleted file mode 100644
index 81f3d2e63..000000000
--- a/perl-external/bin/build_all_modules.pl
+++ /dev/null
@@ -1,40 +0,0 @@
-#!/usr/bin/env perl
-
-use strict;
-use warnings;
-
-use IPC::Run3;
-use LWP::Simple;
-use YAML;
-use File::Slurp;
-use Path::Class;
-
-my $root_dir = file(__FILE__)->dir->parent->absolute->stringify;
-my $module_list = "$root_dir/modules.txt";
-my $minicpan = "$root_dir/minicpan";
-my $local_lib = "$root_dir/../local-lib5";
-my $cpanm_cmd =
- "perl $root_dir/bin/cpanm --mirror $minicpan --mirror-only -l $local_lib";
-
-my @modules = map { s{\s+$}{}; $_; } read_file($module_list);
-
-foreach my $module (@modules) {
- print " --- installing $module ---\n";
-
- my $out = '';
- my $cmd = "$cpanm_cmd $module";
-
- print " running '$cmd'\n";
-
- run3( $cmd, undef, \$out, \$out )
- || die "Error running '$cmd'";
-
- my @lines =
- grep { m{\S} }
- split /\n+/, $out;
- my $last_line = $lines[-1];
-
- die "Error building '$module':\n\n$out\n\n"
- unless $last_line =~ m{Successfully installed }
- || $last_line =~ m{is up to date};
-}