Response
  { statusLine =
      StatusLine { statusCode = 400 , statusReason = "Bad Request" }
  , headers =
      [ Header { name = "Content-Type" , value = "application/json" }
      , Header { name = "Content-Length" , value = "100" }
      ]
  }