--- a/update-serial.pl	Tue Dec 21 16:40:28 2010 +0100
+++ b/update-serial.pl	Tue Dec 21 17:00:11 2010 +0100
@@ -7,7 +7,7 @@
 
 sub del_double {
 
-    # entfernt doppelte eintraege in einer liste
+    # remove duplicate entries
     my %all;
     grep { $all{$_} = 0 } @_;
     return (keys %all);
@@ -15,7 +15,7 @@
 
 sub read_conf {
 
-    # liest die Konfiguration ein
+    # read the configuration
     my @configs = ("$FindBin::Bin/dnstools.conf", "/etc/dnstools.conf");
     our %config;
 
@@ -39,9 +39,8 @@
 }
 
 sub add_argv {
-
-    # prueft ob zonen aus ARGV verwaltete zonen sind
-    # und fuegt sie, falls ja in die liste @new_serial ein
+    # checked whether the zones in argv are managed zones and
+    #inserted them into the list new_serial
     our @new_serial;
     our $master_dir;
     my $zone;
@@ -79,8 +78,8 @@
 }
 
 sub sign_end {
-    our $sign_alert_time;    # die zeit zwischen dem ende und der neuen
-                             # signierung (siehe externe konfiguration)
+    our $sign_alert_time;    # the time between the end and the new signing
+                             # (see external configuration)
     our $master_dir;
     our @new_serial;