zone-rm.pl
branchhs12
changeset 75 4c0f518fd1be
parent 72 d3d2108f07da
equal deleted inserted replaced
74:8b8735676881 75:4c0f518fd1be
     2 
     2 
     3 use warnings;
     3 use warnings;
     4 use strict;
     4 use strict;
     5 use File::Path;
     5 use File::Path;
     6 use FindBin;
     6 use FindBin;
     7 use dnstools::Config qw(get_config);
     7 use DNStools::Config qw(get_config);
     8 
     8 
     9 # liest die Konfiguration ein
     9 # liest die Konfiguration ein
    10 my %config = get_config("$FindBin::Bin/dnstools.conf", "/etc/dnstools.conf");
    10 my %config = get_config("$FindBin::Bin/dnstools.conf", "/etc/dnstools.conf");
    11 
    11 
    12 my $master_dir = $config{"master_dir"};
    12 my $master_dir = $config{"master_dir"};