use strict;
use warnings;
use File::Spec;

my @modules = qw/DBIx-Custom DBIx-Custom-Basic DBIx-Custom-MySQL
                 DBIx-Custom-Query DBIx-Custom-Result
                 DBIx-Custom-Result DBIx-Custom-SQLite
                 DBIx-Custom-SQL-Template/;

foreach my $module (@modules) {
    chdir $module
      or die "Cannot change directory '$module': $!";
    
    system('perl Build realclean');
    system('perl Build.PL');
    system('perl Build');
    system('perl Build test');
    system('perl Build install');
    system('perl Build disttest');
    system('perl Build dist');
    
    chdir File::Spec->updir
      or die "Cannot change up directory: $!";
}