diff --git a/bind8/restart.cgi b/bind8/restart.cgi
index ca52a8190..7fb68a97c 100755
--- a/bind8/restart.cgi
+++ b/bind8/restart.cgi
@@ -1,6 +1,9 @@
 #!/usr/local/bin/perl
 # restart.cgi
 # Restart the running named
+use strict;
+use warnings;
+our (%access, %text, %in);
 
 require './bind8-lib.pl';
 &ReadParse();
@@ -8,13 +11,13 @@ $access{'ro'} && &error($text{'restart_ecannot'});
 $access{'apply'} == 1 || $access{'apply'} == 3 ||
 	&error($text{'restart_ecannot'});
 &error_setup($text{'restart_err'});
-$err = &restart_bind();
+my $err = &restart_bind();
 &error($err) if ($err);
 
 if ($access{'remote'}) {
 	# Restart all slaves too
 	&error_setup();
-	@slaveerrs = &restart_on_slaves();
+	my @slaveerrs = &restart_on_slaves();
 	if (@slaveerrs) {
 		&error(&text('restart_errslave',
 		     "<p>".join("<br>", map { "$_->[0]->{'host'} : $_->[1]" }