--- a/update-serial.pl	Tue Dec 21 16:58:25 2010 +0100
+++ b/update-serial.pl	Thu Dec 23 23:59:27 2010 +0100
@@ -82,6 +82,7 @@
 }
 
 sub uniq(@) {
+    # remove duplicate entries
     my %all;
     @all{@_} = ();
     keys %all;
@@ -108,9 +109,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;
@@ -148,8 +148,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;