From 305797deb7bc3cb845ea63cd6f83352f9322b8f0 Mon Sep 17 00:00:00 2001
From: stan <stan@e3e1d417-86f3-4887-817a-d78f3d33393f>
Date: Mon, 21 Feb 2005 21:51:02 +0000
Subject: [PATCH] Included 'use bytes' instruction. Put strict at top.

git-svn-id: http://svn.zoneminder.com/svn/zm/trunk@1316 e3e1d417-86f3-4887-817a-d78f3d33393f
---
 scripts/zmaudit.pl.z   | 3 ++-
 scripts/zmdc.pl.z      | 4 ++--
 scripts/zmfilter.pl.z  | 1 +
 scripts/zmpkg.pl.z     | 1 +
 scripts/zmtrigger.pl.z | 4 +++-
 scripts/zmupdate.pl.z  | 3 ++-
 scripts/zmvideo.pl.z   | 1 +
 scripts/zmwatch.pl.z   | 3 ++-
 scripts/zmx10.pl.z     | 5 ++++-
 9 files changed, 18 insertions(+), 7 deletions(-)

diff --git a/scripts/zmaudit.pl.z b/scripts/zmaudit.pl.z
index 8073941f5..9a33185c3 100755
--- a/scripts/zmaudit.pl.z
+++ b/scripts/zmaudit.pl.z
@@ -29,6 +29,8 @@
 # alone as this is valid if they are newly created and have no events
 # yet.
 #
+use strict;
+use bytes;
 
 # ==========================================================================
 #
@@ -85,7 +87,6 @@ use constant VERBOSE => 0; # Whether to output more verbose debug
 #
 # ==========================================================================
 
-use strict;
 use DBI;
 use Getopt::Long;
 
diff --git a/scripts/zmdc.pl.z b/scripts/zmdc.pl.z
index 236426096..1f2b9bb0c 100755
--- a/scripts/zmdc.pl.z
+++ b/scripts/zmdc.pl.z
@@ -27,6 +27,8 @@
 # records what's running and what's not. Other invocations just 
 # connect to the server and pass instructions to it.
 #
+use strict;
+use bytes;
 
 # ==========================================================================
 #
@@ -34,7 +36,6 @@
 #
 # ==========================================================================
 
-
 use constant ZM_CONFIG => "<from zmconfig>";
 use constant ZM_PATH_BIN => "<from zmconfig>";
 use constant ZM_PATH_WEB => "<from zmconfig>";
@@ -85,7 +86,6 @@ use constant VERBOSE => 0; # Whether to output more verbose debug
 #
 # ==========================================================================
 
-use strict;
 use POSIX;
 use Socket;
 use IO::Handle;
diff --git a/scripts/zmfilter.pl.z b/scripts/zmfilter.pl.z
index b0271c13a..723b28794 100755
--- a/scripts/zmfilter.pl.z
+++ b/scripts/zmfilter.pl.z
@@ -26,6 +26,7 @@
 # matching events
 #
 use strict;
+use bytes;
 
 # ==========================================================================
 #
diff --git a/scripts/zmpkg.pl.z b/scripts/zmpkg.pl.z
index ea1a8c0b4..31619c0d1 100755
--- a/scripts/zmpkg.pl.z
+++ b/scripts/zmpkg.pl.z
@@ -25,6 +25,7 @@
 # allow command line control for automatic restart on reboot (see zm script)
 #
 use strict;
+use bytes;
 
 # ==========================================================================
 #
diff --git a/scripts/zmtrigger.pl.z b/scripts/zmtrigger.pl.z
index 597f0a016..b9fe37f8f 100755
--- a/scripts/zmtrigger.pl.z
+++ b/scripts/zmtrigger.pl.z
@@ -24,6 +24,9 @@
 # This script is used to trigger and cancel alarms from external sources
 # using an arbitrary text based format
 #
+use strict;
+use bytes;
+
 # ==========================================================================
 #
 # User config
@@ -95,7 +98,6 @@ sub parseTrigger1
 #
 # ==========================================================================
 
-use strict;
 use DBI;
 use POSIX;
 use Fcntl;
diff --git a/scripts/zmupdate.pl.z b/scripts/zmupdate.pl.z
index e0e2e9a1c..bc39139e0 100755
--- a/scripts/zmupdate.pl.z
+++ b/scripts/zmupdate.pl.z
@@ -25,6 +25,8 @@
 # at the the moment. It will eventually be responsible for applying and
 # configuring upgrades etc, including on the fly upgrades.
 #
+use strict;
+use bytes;
 
 # ==========================================================================
 #
@@ -95,7 +97,6 @@ use constant VERBOSE => 0; # Whether to output more verbose debug
 #
 # ==========================================================================
 
-use strict;
 use POSIX;
 use DBI;
 use Getopt::Long;
diff --git a/scripts/zmvideo.pl.z b/scripts/zmvideo.pl.z
index 05a3aad84..806982da4 100644
--- a/scripts/zmvideo.pl.z
+++ b/scripts/zmvideo.pl.z
@@ -25,6 +25,7 @@
 # or as email attachments.
 #
 use strict;
+use bytes;
 
 # ==========================================================================
 #
diff --git a/scripts/zmwatch.pl.z b/scripts/zmwatch.pl.z
index 9421c960a..d087a980e 100755
--- a/scripts/zmwatch.pl.z
+++ b/scripts/zmwatch.pl.z
@@ -25,6 +25,8 @@
 # checks the fps output of the active daemons to check they haven't 
 # locked up. If they have then they are killed and restarted
 #
+use strict;
+use bytes;
 
 # ==========================================================================
 #
@@ -80,7 +82,6 @@ use constant VERBOSE => 0; # Whether to output more verbose debug
 #
 # ==========================================================================
 
-use strict;
 use POSIX;
 use DBI;
 use Data::Dumper;
diff --git a/scripts/zmx10.pl.z b/scripts/zmx10.pl.z
index 9ebf188ae..659049188 100755
--- a/scripts/zmx10.pl.z
+++ b/scripts/zmx10.pl.z
@@ -24,6 +24,8 @@
 # This script controls the monitoring of the X10 interface and the consequent
 # management of the ZM daemons based on the receipt of X10 signals.
 #
+use strict;
+use bytes;
 
 # ==========================================================================
 #
@@ -79,7 +81,6 @@ use constant VERBOSE => 0; # Whether to output more verbose debug
 #
 # ==========================================================================
 
-use strict;
 use POSIX;
 use Socket;
 use Getopt::Long;
@@ -173,6 +174,8 @@ exit;
 package X10Server;
 
 use strict;
+use bytes;
+
 use POSIX;
 use DBI;
 use Socket;