aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xaxfr2acl/axfr2acl6
1 files changed, 2 insertions, 4 deletions
diff --git a/axfr2acl/axfr2acl b/axfr2acl/axfr2acl
index 1accab7..19e4f24 100755
--- a/axfr2acl/axfr2acl
+++ b/axfr2acl/axfr2acl
@@ -155,7 +155,7 @@ sub read_acl($) {
@oldlist = Net::CIDR::cidradd($_,@oldlist);
$line++;
}
- sort @oldlist;
+ @oldlist = sort @oldlist;
close(FILE);
}
@@ -314,12 +314,10 @@ if (!$need_update) {
exit(1);
}
-sort @netlist;
-
if ($update) {
my %oldset = map { $_ => $_ } @oldlist;
$update = 0;
- foreach my $net (@netlist) {
+ foreach my $net (sort @netlist) {
if (!$oldset{$net}) {
$update = 1;
last;

Return to:

Send suggestions and report system problems to the System administrator.