From 3887899f3e6fccd121e3b26471b6d3eff6885dce Mon Sep 17 00:00:00 2001
From: Joe Cooper <joe@virtualmin.com>
Date: Wed, 1 Jun 2016 02:53:14 -0700
Subject: [PATCH] strict/warn

---
 bind8/enable_zonedt.cgi | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/bind8/enable_zonedt.cgi b/bind8/enable_zonedt.cgi
index 1aaf2ef47..6a5142f73 100755
--- a/bind8/enable_zonedt.cgi
+++ b/bind8/enable_zonedt.cgi
@@ -1,20 +1,19 @@
 #!/usr/local/bin/perl
 # Create a signing key for a zone, add it, and sign the zone
+use strict;
+use warnings;
+our (%access, %text, %in);
 
 require './bind8-lib.pl';
 
-local $zone;
-local $dom;
-local $desc;
-
 &error_setup($text{'dt_zone_err'});
 &ReadParse();
-$zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
-$dom = $zone->{'name'};
+my $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
+my $dom = $zone->{'name'};
 &can_edit_zone($zone) ||
 	&error($text{'master_ecannot'});
 $access{'dnssec'} || &error($text{'dnssec_ecannot'});
-$desc = &ip6int_to_net(&arpa_to_ip($dom));
+my $desc = &ip6int_to_net(&arpa_to_ip($dom));
 
 &ui_print_unbuffered_header($desc, $text{'dt_enable_title'}, "",
 							undef, undef, undef, undef, &restart_links($zone));