#!/usr/bin/perl -w

# $Id: install-all 625 2017-01-09 01:41:46Z stro $

use strict;
use warnings;

opendir my $DIR, $ENV{'HOME'} . '/perl' or die 'Cannot read perl directory';
my @perls = sort grep { m/^\d/ } readdir $DIR;
closedir $DIR;

my @res;

foreach my $perl (@perls) {
  my $dzil = $ENV{'HOME'} . "/perl/$perl/bin/dzil";

  if (-e $dzil) {
    print 'Using Dist::Zilla in Perl ', $perl, $/;
    push @res, { 'perl' => $perl, 'res' => system($dzil, @ARGV) };
  } else {
    print 'No Dist::Zilla installed in Perl ', $perl, $/;
    push @res, { 'perl' => $perl, 'res' => 'no dzil' };
  }
}


foreach my $res (@res) {
  print $res->{'perl'}, "\t", $res->{'res'}, $/;
}