change threshold for combining headers and body from 1024 bytes to 81…

…92 (slightly faster if the client is running on the same machine, no unnecessary side-effects in performance)

lib/Starlet/Server.pm

@@ -262,7 +262,7 @@ sub _handle_response {
     push @lines, "\015\012";
 
     if (defined $body && ref $body eq 'ARRAY' && @$body == 1
-            && length $body->[0] < 1024) {
+            && length $body->[0] < 8192) {
         # combine response header and small request body
         $self->write_all(
             $conn, join('', @lines, $body->[0]), $self->{timeout},