Don't chomp input by default

gen.pl

@@ -39,8 +39,6 @@ sub add {
 }
 
 while (<>) {
-  chomp;
-
   if (/^\s*#/) {
     # ignore comments
   } elsif (/^.$/) {
@@ -84,7 +82,7 @@ while (<>) {
        "correct" => $1 eq "+" ? JSON::true : $1 eq "-" ? JSON::false : JSON::null
       );
   } elsif (/^.+$/) {		# non-empty line
-    $last_option{"comment"} .= "$_\n";
+    $last_option{"comment"} .= $_;
   }
 }