my @modules = qw ( moduleDir1 moduleDir2); foreach my $module (@modules){ chdir("$module"); system("Perl Makefile.PL"); system("make"); system("make install"); chdir("../"); }