diff --git a/bind8/conf_ncheck.cgi b/bind8/conf_ncheck.cgi
index 1b1249d8c..48d3c9a07 100755
--- a/bind8/conf_ncheck.cgi
+++ b/bind8/conf_ncheck.cgi
@@ -1,5 +1,9 @@
 #!/usr/local/bin/perl
 # Check the whole BIND config and report problems
+use strict;
+use warnings;
+# Globals
+our (%access, %text, %config);
 
 require './bind8-lib.pl';
 &ReadParse();
@@ -8,8 +12,8 @@ $access{'defaults'} || &error($text{'ncheck_ecannot'});
 &ui_print_header(undef, $text{'ncheck_title'}, "",
 		 undef, undef, undef, undef, &restart_links());
 
-$file = &make_chroot($config{'named_conf'});
-@errs = &check_bind_config();
+my $file = &make_chroot($config{'named_conf'});
+my @errs = &check_bind_config();
 if (@errs) {
 	# Show list of errors
 	print "<b>",&text('ncheck_errs', "<tt>$file</tt>"),"</b><p>\n";