use env for all .perl files in regression test directory

8 files changed, 15 insertions, 7 deletions

diff --git a/regression-testing/compare-results.perl b/regression-testing/compare-results.perl
index fce50c55e..bb1503a79 100755
--- a/regression-testing/compare-results.perl
+++ b/regression-testing/compare-results.perl
@@ -1,7 +1,8 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
 # $Id$
 
+use warnings;
 use strict;
 my ($results, $truth) = @ARGV;
 
diff --git a/regression-testing/ensure-regression-data-here.perl b/regression-testing/ensure-regression-data-here.perl
index cc3a61390..4cfa3b173 100755
--- a/regression-testing/ensure-regression-data-here.perl
+++ b/regression-testing/ensure-regression-data-here.perl
@@ -1,5 +1,6 @@
 #!/usr/bin/env perl
 # downloads the regression data
+use warnings;
 use strict;
 use MosesRegressionTesting;
 
diff --git a/regression-testing/run-single-test.perl b/regression-testing/run-single-test.perl
index 37c48b495..94a247e46 100755
--- a/regression-testing/run-single-test.perl
+++ b/regression-testing/run-single-test.perl
@@ -1,7 +1,8 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
 # $Id$
 
+use warnings;
 use strict;
 my $script_dir; BEGIN { use Cwd qw/ abs_path /; use File::Basename; $script_dir = dirname(abs_path($0)); push @INC, $script_dir; }
 use MosesRegressionTesting;
diff --git a/regression-testing/run-test-detokenizer.perl b/regression-testing/run-test-detokenizer.perl
index 9e5888ed0..35b205f90 100755
--- a/regression-testing/run-test-detokenizer.perl
+++ b/regression-testing/run-test-detokenizer.perl
@@ -1,8 +1,9 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 #
 # Detokenization tests.
 #
 
+use warnings;
 use strict;
 # This is here to suppress (false) warnings about OLDOUT and OLDERR being used only once.  Maybe there is a less brutish way to suppress that, but I don't know it.
 no warnings 'once';
diff --git a/regression-testing/run-test-extract.perl b/regression-testing/run-test-extract.perl
index e03502434..2ebd79006 100755
--- a/regression-testing/run-test-extract.perl
+++ b/regression-testing/run-test-extract.perl
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
+use warnings;
 use strict;
 
 BEGIN {
diff --git a/regression-testing/run-test-mert.perl b/regression-testing/run-test-mert.perl
index 233e08b44..dd54e1b67 100755
--- a/regression-testing/run-test-mert.perl
+++ b/regression-testing/run-test-mert.perl
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
+use warnings;
 use strict;
 my $script_dir; BEGIN { use Cwd qw/ abs_path /; use File::Basename; $script_dir = dirname(abs_path($0)); push @INC, $script_dir; }
 #use MertRegressionTesting;
diff --git a/regression-testing/run-test-misc.perl b/regression-testing/run-test-misc.perl
index 9b65115c1..a58850337 100755
--- a/regression-testing/run-test-misc.perl
+++ b/regression-testing/run-test-misc.perl
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
+use warnings;
 use strict;
 
 BEGIN {
diff --git a/regression-testing/run-test-scorer.perl b/regression-testing/run-test-scorer.perl
index 9f4f15d9e..ecca7d1cd 100755
--- a/regression-testing/run-test-scorer.perl
+++ b/regression-testing/run-test-scorer.perl
@@ -1,5 +1,6 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 
+use warnings;
 use strict;
 
 BEGIN {