Update Perl version declaration and warnings for server scripts

Add use 5.008 and use warnings uniformly to all of the server backend
scripts.

diff --git a/server/keytab-backend b/server/keytab-backend
index bd5a3f9b0e318e26a463b53a4d318dd837b53a32..6e47331905a47b5a0cd489de63078af238b38d1f 100755 (executable)
--- a/server/keytab-backend
+++ b/server/keytab-backend
@@ -16,10 +16,7 @@
 #
 # The keytab for the extracted principal will be printed to standard output.
 
-##############################################################################
-# Declarations and site configuration
-##############################################################################
-
+use 5.008;
 use strict;
 use warnings;
 

diff --git a/server/wallet-admin b/server/wallet-admin
index 7ba1021765c88e88d137db4530c2ae98e49f1c53..e74b2f1036bfde2d9d2d4331faafa6338deb3a30 100755 (executable)
--- a/server/wallet-admin
+++ b/server/wallet-admin
@@ -1,12 +1,11 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 #
 # Wallet server administrative commands.
 
-##############################################################################
-# Declarations and site configuration
-##############################################################################
-
+use 5.008;
 use strict;
+use warnings;
+
 use Wallet::Admin;
 
 ##############################################################################

diff --git a/server/wallet-backend b/server/wallet-backend
index ea3e21e14122393bb838e4e98f9b06e3a851a90a..aa83a9650cb0df985ea9bd74887e158b1004d0d5 100755 (executable)
--- a/server/wallet-backend
+++ b/server/wallet-backend
@@ -2,10 +2,7 @@
 #
 # Wallet server for storing and retrieving secure data.
 
-##############################################################################
-# Declarations and site configuration
-##############################################################################
-
+use 5.008;
 use strict;
 use warnings;
 

diff --git a/server/wallet-report b/server/wallet-report
index 22637cab07395ef28d458c0a53eae428d79b8fff..650822731a9d930d7c6194631720e7d72949fad2 100755 (executable)
--- a/server/wallet-report
+++ b/server/wallet-report
@@ -1,12 +1,11 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 #
 # Wallet server reporting interface.
 
-##############################################################################
-# Declarations and globals
-##############################################################################
-
+use 5.008;
 use strict;
+use warnings;
+
 use Wallet::Report;
 
 # The help output, sent in reply to the help command.  Lists each supported