From: Rich Bowen <rbowen@apache.org>
Date: Fri, 13 Apr 2012 11:52:46 +0000 (+0000)
Subject: use strict; use warnings;
X-Git-Tag: 2.5.0-alpha~7172
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=69a3a9b32a9e78784795c1125a1dfad7a51a18f0;p=thirdparty%2Fapache%2Fhttpd.git

use strict; use warnings;


git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@1325724 13f79535-47bb-0310-9956-ffa450edef68
---

diff --git a/support/split-logfile.in b/support/split-logfile.in
index 061162e8482..59eda713f9a 100644
--- a/support/split-logfile.in
+++ b/support/split-logfile.in
@@ -26,22 +26,25 @@
 # The combined log file is read from stdin. Records read
 # will be appended to any existing log files.
 #
-%is_open = ();
+use strict;
+use warnings;
 
-while ($log_line = <STDIN>) {
+my %is_open = ();
+
+while (my $log_line = <STDIN>) {
     #
     # Get the first token from the log record; it's the
     # identity of the virtual host to which the record
     # applies.
     #
-    ($vhost) = split (/\s/, $log_line);
+    my ($vhost) = split (/\s/, $log_line);
     #
     # Normalize the virtual host name to all lowercase.
     # If it's blank, the request was handled by the default
     # server, so supply a default name.  This shouldn't
     # happen, but caution rocks.
     #
-    $vhost = lc ($vhost) or "access";
+    $vhost = lc ($vhost) || "access";
     #
     # if the vhost contains a "/" or "\", it is illegal so just use 
     # the default log to avoid any security issues due if it is interprted