|
|
@ -4,7 +4,7 @@ use esmith::NetworksDB; |
|
|
|
my $n = esmith::NetworksDB->open_ro() || |
|
|
|
my $n = esmith::NetworksDB->open_ro() || |
|
|
|
die "Couldn't open networks DB\n"; |
|
|
|
die "Couldn't open networks DB\n"; |
|
|
|
|
|
|
|
|
|
|
|
my @ip = ("127.0.0.1"); |
|
|
|
my @ip = ("127.0.0.0/8"); |
|
|
|
|
|
|
|
|
|
|
|
# Add hosts which can access the server-manager to the whitelist |
|
|
|
# Add hosts which can access the server-manager to the whitelist |
|
|
|
push @ip, $_ foreach (split /[,;]/, (${'httpd-admin'}{'ValidFrom'} || '')); |
|
|
|
push @ip, $_ foreach (split /[,;]/, (${'httpd-admin'}{'ValidFrom'} || '')); |
|
|
|