equal
deleted
inserted
replaced
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 my::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"}; |