uncomment needed lines in benchmark

Author: Ivan Kruglov

tools/benchmarks/readline_vs_sysread_vs_recv/server-generator.pl

@@ -20,10 +20,10 @@
     my $line = <$client>;
     chomp $line;
 
-#    my ($cnt, $len) = split(',', $line);
-#    next unless $cnt || $len;
+    my ($cnt, $len) = split(',', $line);
+    next unless $cnt || $len;
 
-#    for (my $i = 1; $i <= $cnt; ++$i) {
-#        print $client '.' x $len, "\n";
-#    }
+    for (my $i = 1; $i <= $cnt; ++$i) {
+        print $client '.' x $len, "\n";
+    }
 }