diff -r 5b52190d8750 -r 6715f8f9d04c dnssec-sign --- a/dnssec-sign Wed Jul 28 14:14:47 2010 +0200 +++ b/dnssec-sign Thu Jul 29 14:19:56 2010 +0200 @@ -11,7 +11,7 @@ my $kc; # prueft zonen aus ARGV und fuegt sie in die liste @manu ein -foreach (@ARGV) { +for (@ARGV) { chomp ($zone = `idn --quiet $_`); if (-e "$master_dir/$zone") { push @manu, $zone; @@ -30,8 +30,9 @@ # vergleicht fuer alle zonen im ordner $master_dir mit einer # .signed-datei den zeitpunkt in $time mit dem ablaufdatum der # signatur, welcher aus der datei .signed ausgelesen wird. -foreach (`ls $master_dir`) { - chomp ($zone = $_); +for (<$master_dir/*>) { + s#($master_dir/)(.*)#$2#; + $zone = $_; if (-e "$master_dir/$zone/$zone.signed") { @@ -51,9 +52,12 @@ } #gibt zonen mit schluessel aber ohne signatur in die liste @auto -foreach (`ls $master_dir`) { - chomp ($zone = $_); +for (<$master_dir/*>) { + s#($master_dir/)(.*)#$2#; + $zone = $_; + + print $zone; if (-e "$master_dir/$zone/.keycounter") { open (KC, "$master_dir/$zone/.keycounter" ); @@ -68,7 +72,7 @@ # signiert alle zonen in @auto und @manu und erhoeht den wert in # der keycounter-datei -foreach (@auto, @manu) { +for (@auto, @manu) { $zone = $_ ; chdir "$master_dir/$zone";