Fix pointless warnings flooding error log

acl/acl-lib.pl

@@ -15,6 +15,7 @@ BEGIN { push(@INC, ".."); };
 use strict;
 use warnings;
 no warnings 'redefine';
+no warnings 'uninitialized';
 use WebminCore;
 &init_config();
 do 'md5-lib.pl';

acl/acl_security.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 do 'acl-lib.pl';
 our (%text, %in);
 

acl/backup_config.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require 'acl-lib.pl';
 our ($config_directory, %gconfig);
 

acl/cert_form.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 &ui_print_header(undef, $text{'cert_title'}, "", undef, undef, undef, undef,

acl/cert_issue.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $module_config_directory, $base_remote_user);
 &ReadParse();

acl/cert_output.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 

acl/cgi_args.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 do 'acl-lib.pl';
 our (%access);
 

acl/convert.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $config_directory);
 &ReadParse();

acl/convert_form.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'sync'} && $access{'create'} || &error($text{'convert_ecannot'});

acl/delete_group.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &ReadParse();

acl/delete_groups.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &ReadParse();

acl/delete_session.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, %sessiondb);
 &ReadParse();

acl/delete_user.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &ReadParse();

acl/delete_users.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &ReadParse();

acl/edit_acl.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user, %gconfig);
 &ReadParse();

acl/edit_group.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $config_directory);
 &ReadParse();

acl/edit_pass.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'pass'} || &error($text{'pass_ecannot'});

acl/edit_rbac.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %gconfig, %access, $module_name, $module_root_directory);
 $access{'rbacenable'} || &error($text{'rbac_ecannot'});

acl/edit_sql.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'sql'} || &error($text{'sql_ecannot'});

acl/edit_sync.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'sync'} && $access{'create'} && $access{'delete'} ||

acl/edit_unix.cgi

@@ -5,6 +5,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'unix'} && $access{'create'} && $access{'delete'} ||

acl/edit_user.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $config_directory, $base_remote_user, $remote_user);
 &foreign_require("webmin", "webmin-lib.pl");

acl/feedback_files.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 do 'acl-lib.pl';
 our ($config_directory);
 

acl/index.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &ReadParse();

acl/list_sessions.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, %sessiondb);
 $access{'sessions'} || &error($text{'sessions_ecannot'});

acl/log_parser.pl

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 do 'acl-lib.pl';
 our (%text);
 

acl/makedn.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'pass'} || &error($text{'sql_ecannot'});

acl/maketables.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'pass'} || &error($text{'sql_ecannot'});

acl/postinstall.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require 'acl-lib.pl';
 our ($config_directory);
 

acl/save_acl.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user, %gconfig,
      $config_directory);

acl/save_group.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $config_directory);
 &ReadParse();

acl/save_pass.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'pass'} || &error($text{'pass_ecannot'});

acl/save_sql.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'pass'} || &error($text{'sql_ecannot'});

acl/save_sync.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $module_config_directory);
 &ReadParse();

acl/save_twofactor.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &foreign_require("webmin");

acl/save_unix.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 &ReadParse();

acl/save_user.cgi

@@ -4,6 +4,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $config_directory, $base_remote_user);
 &foreign_require("webmin", "webmin-lib.pl");

acl/schema.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access);
 $access{'pass'} || &error($text{'sql_ecannot'});

acl/switch.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, %sessiondb);
 &ReadParse();

acl/system_info.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%text, $remote_user, %sessiondb, $module_name);
 do 'acl-lib.pl';
 

acl/twofactor_form.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './acl-lib.pl';
 our (%in, %text, %config, %access, $base_remote_user);
 &foreign_require("webmin");

acl/useradmin_update.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 if (!$main::done_foreign_require{"acl","acl-lib.pl"}) {
 	do "acl-lib.pl";
 	}

ajaxterm/index.cgi

@@ -3,6 +3,8 @@
 # a URL that proxies to it
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 BEGIN { push(@INC, ".."); };
 use WebminCore;
@@ -70,6 +72,8 @@ while(1) {
 close(TEST2);
 use strict "subs";
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 # Show the iframe
 print "<center>\n";

ajaxterm/proxy.cgi

@@ -2,6 +2,8 @@
 # Proxy an Ajaxterm request to the real port
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 BEGIN { push(@INC, ".."); };
 use WebminCore;

at/acl_security.pl

@@ -1,5 +1,7 @@
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%text, %in);
 
 require 'at-lib.pl';

at/backup_config.pl

@@ -1,5 +1,7 @@
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our %config;
 
 do 'at-lib.pl';

at/cgi_args.pl

@@ -1,5 +1,7 @@
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our %access;
 
 do 'at-lib.pl';

at/create_job.cgi

@@ -3,6 +3,8 @@
 # Create a new at job
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%access, %text, %in);
 
 require './at-lib.pl';

at/delete_job.cgi

@@ -2,6 +2,8 @@
 # Delete or run an at job
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%text, %in); 
 
 require './at-lib.pl';

at/delete_jobs.cgi

@@ -2,6 +2,8 @@
 # Delete multiple at jobs
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our(%access, %text, %in);
 
 require './at-lib.pl';

at/edit_job.cgi

@@ -3,6 +3,8 @@
 # Display a command for deletion
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%access, %text, %in);
 
 require './at-lib.pl';

at/freebsd-lib.pl

@@ -1,6 +1,8 @@
 # freebsd-lib.pl
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 no warnings "redefine";
 our (%config);
 

at/index.cgi

@@ -7,6 +7,8 @@
 #   ext_cmd  : default command
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%access, %text, %in, %config);
 our ($module_name, $remote_user);
 

at/install_check.pl

@@ -1,6 +1,8 @@
 # install_check.pl
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 do 'at-lib.pl';
 

at/linux-lib.pl

@@ -1,6 +1,8 @@
 # linux-lib.pl
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 no warnings "redefine";
 our (%config);
 

at/log_parser.pl

@@ -2,6 +2,8 @@
 # Functions for parsing this module's logs
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our %text;
 
 do 'at-lib.pl';

at/macos-lib.pl

@@ -1,6 +1,8 @@
 # macos-lib.pl
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 no warnings "redefine";
 our %config;
 

at/save_allow.cgi

@@ -2,6 +2,8 @@
 # Update allowed or denied At users
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%access, %text, %in);
 
 require './at-lib.pl';

at/solaris-lib.pl

@@ -1,6 +1,8 @@
 # solaris-lib.pl
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 no warnings "redefine";
 our %config;
 

backup-config/backup-config-lib.pl

@@ -13,6 +13,8 @@ Functions for creating configuration file backups. Some example code :
 BEGIN { push(@INC, ".."); };
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 use WebminCore;
 our (%text, $module_config_directory, %config);
 &init_config();

backup-config/backup.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './backup-config-lib.pl';
 our (%in, %text, %config, $module_config_file);
 &ReadParse();

backup-config/backup.pl

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%text, %config, $no_acl_check);
 $no_acl_check++;
 require './backup-config-lib.pl';

backup-config/cgi_args.pl

@@ -1,6 +1,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 do 'backup-config-lib.pl';
 
 sub cgi_args

backup-config/edit.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './backup-config-lib.pl';
 our (%in, %text);
 &ReadParse();

backup-config/index.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './backup-config-lib.pl';
 our (%text, %in, %config);
 &ReadParse();

backup-config/log_parser.pl

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 do 'backup-config-lib.pl';
 our (%text);
 

backup-config/restore.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './backup-config-lib.pl';
 our (%in, %text, %config, $module_config_file);
 &ReadParseMime();

backup-config/save.cgi

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require './backup-config-lib.pl';
 our (%in, %text, $cron_cmd, $module_name);
 &ReadParse();

backup-config/uninstall.pl

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 require 'backup-config-lib.pl';
 
 sub module_uninstall

bin/disable-proxy

@@ -2,6 +2,8 @@
 # disable-proxy - Reverse/remove the configuration options set by enable-proxy.
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 BEGIN { $Pod::Usage::Formatter = 'Pod::Text::Color'; }
 use 5.010; # Version in CentOS 6
 

bin/disable-twofactor

@@ -2,6 +2,8 @@
 # disable-twofactor - Disable two-factor authentication for a user. 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 BEGIN { $Pod::Usage::Formatter = 'Pod::Text::Color'; }
 use 5.010; # Version in CentOS 6
 

bin/enable-proxy

@@ -3,6 +3,8 @@
 # through a proxy.
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 BEGIN { $Pod::Usage::Formatter = 'Pod::Text::Color'; }
 use 5.010; # Version in CentOS 6
 

bin/language-manager

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 use 5.014;
 
 use File::Spec;

bin/list-config

@@ -3,6 +3,8 @@
 # module.
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 BEGIN { $Pod::Usage::Formatter = 'Pod::Text::Color'; }
 use 5.010; # Version in CentOS 6
 

bin/passwd

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 use 5.010;
 
 use File::Basename;

bin/server

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 use 5.010;
 
 use File::Basename;

bin/set-config

@@ -3,6 +3,8 @@
 # restart Webmin to apply the change.
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 BEGIN { $Pod::Usage::Formatter = 'Pod::Text::Color'; }
 use 5.010; # Version in CentOS 6
 

bin/update-devel

@@ -3,6 +3,8 @@
 
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 use 5.010;
 

bin/webmin

@@ -3,6 +3,8 @@
 # functions on the command line.
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 BEGIN { $Pod::Usage::Formatter = 'Pod::Text::Color'; }
 use 5.010; # Version in CentOS 6
 

bind8/acl_security.pl

@@ -1,5 +1,7 @@
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 require 'bind8-lib.pl';
 # Globals from bind8-lib.pl

bind8/backup_config.pl

@@ -1,5 +1,7 @@
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 do 'bind8-lib.pl';
 # Globals from bind8-lib.pl

bind8/bind8-lib.pl

@@ -3,8 +3,9 @@
 
 use strict;
 use warnings;
-use Time::Local;
 no warnings 'redefine';
+no warnings 'uninitialized';
+use Time::Local;
 
 BEGIN { push(@INC, ".."); };
 use WebminCore;

bind8/cgi_args.pl

@@ -1,5 +1,7 @@
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 do 'bind8-lib.pl';
 # Globals from bind8-lib.pl

bind8/check_zone.cgi

@@ -2,6 +2,8 @@
 # Check a zone's records and report problems
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 require './bind8-lib.pl';
 # Globals from bind8-lib.pl

bind8/close.cgi

@@ -2,6 +2,8 @@
 # Remove some zone from the open list
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%in);
 

bind8/conf_acls.cgi

@@ -3,6 +3,8 @@
 # Display global ACLs
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%text, %access);
 

bind8/conf_controls.cgi

@@ -2,6 +2,8 @@
 # Display NDC control interface options
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%text, %access); 
 

bind8/conf_dnssec.cgi

@@ -2,6 +2,8 @@
 # Show a form to setup DNSSEC key rotation
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%text, %access, %config);
 

bind8/conf_dnssectools.cgi

@@ -2,6 +2,8 @@
 # Show a form to setup DNSSEC-Tools parameters
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text, %config);
 

bind8/conf_files.cgi

@@ -3,6 +3,8 @@
 # Display global files options
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text);
 

bind8/conf_forwarding.cgi

@@ -3,6 +3,8 @@
 # Display global forwarding and transfer options
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text);
 

bind8/conf_keys.cgi

@@ -3,6 +3,8 @@
 # Display options for other DNS servers
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 
 require './bind8-lib.pl';
 # Globals

bind8/conf_logging.cgi

@@ -3,6 +3,8 @@
 # Display global logging options
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 our (%access, %text, %in);
 our (@syslog_levels, @severities, @cat_list);
 

bind8/conf_manual.cgi

@@ -2,6 +2,8 @@
 # Show a page for manually editing named.conf
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text, %in);
 

bind8/conf_misc.cgi

@@ -3,6 +3,8 @@
 # Display miscellaneous options
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text);
 

bind8/conf_ncheck.cgi

@@ -2,6 +2,8 @@
 # Check the whole BIND config and report problems
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text, %config);
 

bind8/conf_net.cgi

@@ -2,6 +2,8 @@
 # Display global networking options
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text); 
 

bind8/conf_rndc.cgi

@@ -3,6 +3,8 @@
 # XXX should check if already working!
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text, %config);
 our $module_name;

bind8/conf_servers.cgi

@@ -3,6 +3,8 @@
 # Display options for other DNS servers
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text);
 

bind8/conf_trusted.cgi

@@ -2,6 +2,8 @@
 # Show a form for setting up DNSSEC verification and trusted keys
 use strict;
 use warnings;
+no warnings 'redefine';
+no warnings 'uninitialized';
 # Globals
 our (%access, %text);
 our $dnssec_dlv_zone;