Use portable enabling of warnings for perl scripts

Resolves ukf/ukf-meta#111.

attic/keynames.pl

@@ -1,10 +1,11 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 #
 # keynames.pl
 #
 # Extracts statistics about KeyName elements from the published metadata.
 #
+use warnings;
 use lib "../build";
 use Xalan;
 use Months;

attic/keynames_inner.pl

@@ -1,4 +1,6 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
+
+use warnings;
 use POSIX qw(floor);
 use File::Temp qw(tempfile);
 use Date::Format;

charting/fetch.pl

@@ -1,8 +1,9 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 #
 # fetch.pl
 #
+use warnings;
 use File::stat;
 use Months;
 

charting/mdui.pl

@@ -1,8 +1,9 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 #
 # mdui.pl
 #
+use warnings;
 use lib "../build";
 use Xalan;
 use Months;

charting/saml2.pl

@@ -1,10 +1,11 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 #
 # saml2.pl
 #
 # Extracts statistics about SAML 2 adoption from the published metadata.
 #
+use warnings;
 use lib "../build";
 use Xalan;
 use Months;

charting/scopes.pl

@@ -1,10 +1,11 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 #
 # scopes.pl
 #
 # Extracts statistics about number of scopes from the published metadata.
 #
+use warnings;
 use lib "../build";
 use Xalan;
 use Months;

charting/sizes.pl

@@ -1,8 +1,9 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 #
 # sizes.pl
 #
+use warnings;
 use lib "../build";
 use File::stat;
 use Xalan;

utilities/2016-09-16/doall.pl

@@ -1,4 +1,6 @@
-#!/usr/bin/env perl -W
+#!/usr/bin/env perl
+
+use warnings;
 
 open(F, "id-to-name.txt") || die "could not open id-to-name map";
 while (<F>) {

utilities/2016-09-16/patch.pl

@@ -1,4 +1,6 @@
-#!/usr/bin/env perl -W
+#!/usr/bin/env perl
+
+use warnings;
 
 my $orgID = shift @ARGV;
 

utilities/2016-10-06/patch.pl

@@ -1,4 +1,6 @@
-#!/usr/bin/env perl -W
+#!/usr/bin/env perl
+
+use warnings;
 
 open(F, "id-to-name.txt") || die "could not open id-to-name map";
 while (<F>) {