--- a/dnssec-creatkey	Thu Jul 29 14:19:56 2010 +0200
+++ b/dnssec-creatkey	Mon Aug 02 11:15:18 2010 +0200
@@ -2,17 +2,32 @@
 
 use strict;
 
-my $master_dir="/etc/bind/master";	# verzeichnis fuer bind
-my $key_counter_end="10";		# ablauf des schluessels
-my @change;			# liste abgelaufener zonen
-my @manu;			# liste manuell eingegebener zonen aus ARGV
+my %config;
+open (CONFIG, "dnstools.conf");
+while (<CONFIG>) {
+        chomp;
+        s/#.*//;
+        s/\t//g;
+        s/\s//g;
+
+        next unless length;
+        my ($cname, $ccont) = split (/\s*=\s*/, $_,2);
+        $config{$cname} = $ccont;
+}
+close (CONFIG);
+
+
+my $master_dir= $config{master_dir};
+my $key_counter_end=$config{key_counter_end};
+my @change;
+my @manu;
 my @index;
 my $zone;
 my $keyname;
 
 # prueft ob eingaben in ARGV domains sind und gibt sie in die liste @manu
 for (@ARGV) {
-	chomp ($zone = `idn --quiet "$_"`);
+	chomp (my $zone = `idn --quiet "$_"`);
 
 	if (-e "$master_dir/$zone") {
 		push (@manu, $zone);