equal
deleted
inserted
replaced
6 my $conf_dir = "/etc/bind/zones.d"; |
6 my $conf_dir = "/etc/bind/zones.d"; |
7 my $master_dir = "/etc/bind/master"; |
7 my $master_dir = "/etc/bind/master"; |
8 chomp (my @domains = `ls $master_dir`); |
8 chomp (my @domains = `ls $master_dir`); |
9 chomp (my @conf_dir_files = `ls $conf_dir`); |
9 chomp (my @conf_dir_files = `ls $conf_dir`); |
10 |
10 |
11 # prueft jede domain die einen verzeichniss in $master_dir hat, ob es eine |
11 # prueft jede domain, die ein verzeichnis in $master_dir hat, ob es eine |
12 # datei <$domain>.signed gibt und ob der eintrag in $conf_dir/$domain dem |
12 # datei $zone_file.signed gibt und ob diese datei in $config_file eingetragen |
13 # ergebniss entspricht. |
13 # ist. |
14 # passt die eintraeg in der config-datei falls noetig an. |
14 # passt die eintraege in $config_file falls noetig an. |
15 foreach (@domains) { |
15 foreach (@domains) { |
16 my $domain = $_; |
16 my $domain = $_; |
17 my $zone_file = "$master_dir/$domain/$domain"; |
17 my $zone_file = "$master_dir/$domain/$domain"; |
18 my $conf_file = "$conf_dir/$domain"; |
18 my $conf_file = "$conf_dir/$domain"; |
19 my @c_content; |
19 my @c_content; |