Add "verbose-modules-test" target

1 files changed, 4 insertions, 1 deletions

diff --git a/tools/build/modules-test.pl b/tools/build/modules-test.pl
index 095e76b..396f066 100644
--- a/tools/build/modules-test.pl
+++ b/tools/build/modules-test.pl
@@ -1,6 +1,9 @@
 #! perl
 
 use Cwd;
+use Getopt::Long;
+
+GetOptions('verbose' => \my $verbose);
 
 my $base = shift @ARGV;
 my $perl6 = shift @ARGV;
@@ -11,7 +14,7 @@ while (<>) {
     print "Testing modules/$moduledir with $perl6...\n";
     if (-d "$base/modules/$moduledir/t") {
         chdir("$base/modules/$moduledir");
-        system('prove', '-e', $perl6, '-r', 't');
+        system('prove', $verbose ? '-v' : (), '-e', $perl6, '-r', 't');
     }
     else {
         print "...no t/ directory found.\n";