Don't print a trailing comma for the last entry in enum def_tupple

def_data.h

@@ -124,5 +124,5 @@ enum def_tupple {
 	once,
 	always,
 	any,
-	all,
+	all
 };

mkdefaults

@@ -109,8 +109,9 @@ print CFILE "\tNULL, 0, NULL\n    }\n};\n";
 # Print out def_tuple
 if (@tuple_values) {
     print HEADER "\nenum def_tupple {\n";
-    foreach (@tuple_values) {
-	print HEADER "\t$_,\n";
+    for ($i = 0; $i <= $#tuple_values; $i++) {
+	printf HEADER "\t%s%s\n", $tuple_values[$i],
+	    $i != $#tuple_values ? "," : "";
     }
     print HEADER "};\n";
 }