diff --git a/scripts/main.pl b/scripts/main.pl
index 2224c68..213d6b6 100644
--- a/scripts/main.pl
+++ b/scripts/main.pl
@@ -6,10 +6,13 @@ use warnings;
 
 use File::Basename qw/dirname/;
 
-{
+BEGIN {
+    open my $fh, '>&', \*STDERR;
+    open STDERR, '>', '/dev/null';
     system 'perl', 'Build.PL';
     system 'perl', 'Build', 'build';
-}
+    open STDERR, '>&', $fh;
+};
 
 use blib;