blob: 4caacb7654a3c9fe9e814f35933ebe77a21a1987 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
#! perl
use warnings;
use strict;
my $perl6bin = shift @ARGV;
my $pandabin = shift @ARGV;
my $bindir = shift @ARGV;
my $exit = 0;
while (<>) {
next if /^\s*(#|$)/;
my ($module) = /(\S+)/;
$exit ||= system $perl6bin, $pandabin, '--force', "--bin-prefix=$bindir", "install", "modules/$module";
}
exit $exit;
|