diff options
author | Edmund von der Burg <evdb@mysociety.org> | 2011-03-12 17:20:34 +0000 |
---|---|---|
committer | Edmund von der Burg <evdb@mysociety.org> | 2011-03-12 17:20:34 +0000 |
commit | 2575dc899273b0ae950fc49e71ed1d43037a18bb (patch) | |
tree | 18e160c7eab5461f0eebf9dff9cfa89c152246c6 /perl-external/bin/build_all_modules.pl | |
parent | 953acbb0d034be11dc165e627f9400fdd40898f8 (diff) |
set up management correctly
Diffstat (limited to 'perl-external/bin/build_all_modules.pl')
-rw-r--r-- | perl-external/bin/build_all_modules.pl | 40 |
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}; -} |