lib/DNStools/UpdateSerial.pm
changeset 135 ad9d6900e4ea
parent 129 642a27894c86
child 138 046d8e631700
equal deleted inserted replaced
134:3144d779bf00 135:ad9d6900e4ea
   368 sub done_rollover() {
   368 sub done_rollover() {
   369 
   369 
   370     # funktion ueberprueft ob ein keyrollover fertig ist
   370     # funktion ueberprueft ob ein keyrollover fertig ist
   371     # die bedingung dafuer ist das:
   371     # die bedingung dafuer ist das:
   372     # - eine datei .index.zsk vorhanden ist
   372     # - eine datei .index.zsk vorhanden ist
   373     # - die datei .index.zsk älter ist, als die rollover-Zeit
   373     # - die letzte änderung an der datei .index.zsk länger her ist als die abl_zeit
   374     # - die datei .index.zsk ueber mehr als eine zeile gross ist
   374     # - die datei .index.zsk ueber mehr als eine zeile gross ist
   375     #   (also mehr als einen Schlüssel enthält)
   375     #   (also mehr als einen Schlüssel enthält)
   376     my @r;
   376     my @r;
   377     my $now = time;
   377     my $now = time;
   378 
   378