From e96c1cac11ebe7074ecf69b3e60eaf9487ada7d2 Mon Sep 17 00:00:00 2001
From: Joe Cooper <joe@virtualmin.com>
Date: Thu, 2 Jun 2016 19:16:36 -0700
Subject: [PATCH] strict/warn

---
 bind8/save_forwarding.cgi | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/bind8/save_forwarding.cgi b/bind8/save_forwarding.cgi
index 4b7a837a7..8da02ff9b 100755
--- a/bind8/save_forwarding.cgi
+++ b/bind8/save_forwarding.cgi
@@ -1,6 +1,9 @@
 #!/usr/local/bin/perl
 # save_forwarding.cgi
 # Save global forwarding options
+use strict;
+use warnings;
+our (%access, %text, %config);
 
 require './bind8-lib.pl';
 $access{'defaults'} || &error($text{'forwarding_ecannot'});
@@ -8,8 +11,8 @@ $access{'defaults'} || &error($text{'forwarding_ecannot'});
 &ReadParse();
 
 &lock_file(&make_chroot($config{'named_conf'}));
-$conf = &get_config();
-$options = &find("options", $conf);
+my $conf = &get_config();
+my $options = &find("options", $conf);
 &save_forwarders('forwarders', $options, 1);
 &save_choice('forward', $options, 1);
 &save_opt('max-transfer-time-in', \&check_mins, $options, 1);