From a12135fc51f21affd66003e8fba2b8414ffc26e1 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <eelco.dolstra@logicblox.com>
Date: Fri, 12 Dec 2014 17:39:52 +0100
Subject: [PATCH] Don't use Perl's -w flag

---
 src/script/hydra-build                     | 2 +-
 src/script/hydra-create-user               | 2 +-
 src/script/hydra-evaluator                 | 2 +-
 src/script/hydra-init                      | 2 +-
 src/script/hydra-queue-runner              | 2 +-
 src/script/hydra-s3-backup-collect-garbage | 2 +-
 src/script/hydra-server                    | 2 +-
 src/script/hydra-update-gc-roots           | 2 +-
 8 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/src/script/hydra-build b/src/script/hydra-build
index 26310d59..c77f403d 100755
--- a/src/script/hydra-build
+++ b/src/script/hydra-build
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use List::MoreUtils qw(all);
diff --git a/src/script/hydra-create-user b/src/script/hydra-create-user
index 1fcf4728..ec971ace 100755
--- a/src/script/hydra-create-user
+++ b/src/script/hydra-create-user
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use Hydra::Schema;
diff --git a/src/script/hydra-evaluator b/src/script/hydra-evaluator
index b9ef1c53..51843770 100755
--- a/src/script/hydra-evaluator
+++ b/src/script/hydra-evaluator
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use utf8;
diff --git a/src/script/hydra-init b/src/script/hydra-init
index 33c60408..2944b240 100755
--- a/src/script/hydra-init
+++ b/src/script/hydra-init
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use Hydra::Schema;
diff --git a/src/script/hydra-queue-runner b/src/script/hydra-queue-runner
index 2744c243..270b4d1c 100755
--- a/src/script/hydra-queue-runner
+++ b/src/script/hydra-queue-runner
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use Cwd;
diff --git a/src/script/hydra-s3-backup-collect-garbage b/src/script/hydra-s3-backup-collect-garbage
index 990fa535..b68add61 100755
--- a/src/script/hydra-s3-backup-collect-garbage
+++ b/src/script/hydra-s3-backup-collect-garbage
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use File::Basename;
diff --git a/src/script/hydra-server b/src/script/hydra-server
index e56e5621..335ff8ef 100755
--- a/src/script/hydra-server
+++ b/src/script/hydra-server
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 BEGIN {
     $ENV{CATALYST_SCRIPT_GEN} = 40;
diff --git a/src/script/hydra-update-gc-roots b/src/script/hydra-update-gc-roots
index baf8c4ef..4c252eb0 100755
--- a/src/script/hydra-update-gc-roots
+++ b/src/script/hydra-update-gc-roots
@@ -1,4 +1,4 @@
-#! /var/run/current-system/sw/bin/perl -w
+#! /var/run/current-system/sw/bin/perl
 
 use strict;
 use File::Path;