From 88db96cf310d6f9e7a95551f5795abfa2d4e70a2 Mon Sep 17 00:00:00 2001 From: Joe Cooper Date: Thu, 2 Jun 2016 19:38:59 -0700 Subject: [PATCH] strict/warn --- bind8/save_misc.cgi | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/bind8/save_misc.cgi b/bind8/save_misc.cgi index 7cfe17991..199d2581e 100755 --- a/bind8/save_misc.cgi +++ b/bind8/save_misc.cgi @@ -1,6 +1,9 @@ #!/usr/local/bin/perl # save_misc.cgi # Save global miscellaneous options +use strict; +use warnings; +our (%access, %text, %in, %config); require './bind8-lib.pl'; $access{'defaults'} || &error($text{'misc_ecannot'}); @@ -8,8 +11,8 @@ $access{'defaults'} || &error($text{'misc_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_opt("coresize", \&size_check, $options, 1); &save_opt("datasize", \&size_check, $options, 1); &save_opt("files", \&files_check, $options, 1);