http-post - 使用 Ocamlnet 3 的正确方法 - Http_client.Convenience.http

http-post - 使用 Ocamlnet 3 的正确方法 - Http_client.Convenience.http_post

转载作者：行者123 更新时间：2023-12-04 04:53:50

26

4

我正在尝试使用 Http_client.Convenience.http_post制作 http post request .

API 相当简单:

val http_post : string -> (string * string) list -> string

Does a "POST" request with the given URL and returns the response body. The list contains the parameters send with the POST request.

我想做的是构建一个 http post通过 google flights 请求获取航类信息，解释为 part 1在这里: http://www.nohup.in/blog/using-json-google-flights

保持 Post request 的格式，我截图如下:

enter image description here

所以最后，我构造了一个 Http_client.Convenience.http_post为了它:

open Http_client.Convenience;;

let post_para = [("(Request-Line)", "POST /flights/rpc HTTP/1.1");
         ("Host", "www.google.com");
         ("Content-Type", "application/json; charset=utf-8");
         ("X-GWT-Permutation", "0BB89375061712D90759336B50687E78");
         ("X-GWT-Module-Base", "http://www.google.com/flights/static/");
         ("Referer", "http://www.google.com/flights/");
         ("Content-Length", "275");
         ("Cookie", "PREF=ID=2dc218fc830df28d:U=29aaf343dd519bca:FF=0:TM=1307225398:LM=1308065727:GM=1:S=RWC3dYzVvVSpkrlz; NID=52=VTp1QILW1ntPlrkLx7yLUtOYhchNk35G4Lk35KBd7A3lCznVV5glz7lwDoDP2RkjtTJVNZSomv3iffPqiJz4oXfpoph3ljb2eInGOe-FwosvrmSXPpnLkEWxMHIbuaid; S=travel-flights=YFCjkd9M9h3Z_uEqBmgynA");
         ("Pragma", "no-cache");
         ("Cache-Control", "no-cache");
         ("data", "[,[[,\"fs\",\"[,[,[\"SJC\"]\n,\"2012-04-05\",[\"EWR\",\"JFK\",\"LGA\"]\n,\"2012-04-12\"]\n]\n\"]],[,[[,\"b_ca\",\"54\"],[,\"f_ut\",\"search;f=SJC;t=EWR,JFK,LGA;d=2012-04-05;r=2012-04-12\"],[,\"b_lr\",\"11:36\"],[,\"b_lr\",\"1:1528\"],[,\"b_lr\",\"2:1827\"],[,\"b_qu\",\"3\"],[,\"b_qc\",\"1\"]]]]")];;

let search () = try (http_post "http://www.google.com/flights/rpc" post_para) with
    Http_client.Http_error (id, msg) -> msg;;

let _ = print_endline (search());;

当我运行它时，它只会给我以下 error html page :

<HTML>
   <HEAD>
     <TITLE>Internal Server Error</TITLE>
   </HEAD>
   <BODY BGCOLOR="#FFFFFF" TEXT="#000000">
     <H1>Internal Server Error</H1>
     <H2>Error 500</H2>
   </BODY>
</HTML>

谁能告诉我为什么？我的http_post怎么了?

最佳答案

从 post_para 中删除它，它不是 HTTP header ，OCamlnet 会自动为您发送:"(Request-Line)", "POST /flights/rpc HTTP/1.1" .

要分别发送 header 和 POST 数据，您需要使用 set_request_header 设置 header 在 http_call 对象上。

此外，OCamlnet 中的便利模块会将数据作为 application/x-www-form-urlencoded 发送，但我认为您需要按原样发送数据。您可以使用 Http_client.post_raw 来做到这一点。 .

关于http-post - 使用 Ocamlnet 3 的正确方法 - Http_client.Convenience.http_post，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/17047223/

26

4

0

文章推荐： grails - 寻找Grails 2.0的好书

文章推荐： Symfony2无需请求即可进行模板化

文章推荐： dynamics-ax-2012-r2 - Dynamics AX 2012 表单原点

http - HTTP 服务器如何处理非常大的 HTTP 请求？
据我了解，HTTP POST 请求的正文大小没有限制。因此，客户端可能会在一个 HTTP 请求中发送千兆字节的数据。现在我想知道 HTTP 服务器应该如何处理此类请求。 Tomcat 和 Jett
http - http ://*:80 and http://+:80有什么区别
在了解Web Deploy我遇到了一些讨论 http://+:80 和 http://*:80 的 netsh.exe 命令。这些是什么意思？最佳答案引自URLPrefix Strings (Wi
http - HTTP 响应是否遵循与 HTTP 请求相同的路径？
假设我有一个负载均衡器，然后是 2 个 Web 服务器，然后是一个负载均衡器，然后是 4 个应用程序服务器。 HTTP 响应是否遵循与 HTTP 请求服务相同的路径？最佳答案按路径，我假设您是网络
http - HTTP 删除操作失败的 HTTP 响应代码是什么？
我有一个带有 uri /api/books/122 的资源，如果在客户端为此资源发送 HTTP Delete 时该资源不存在，那么相应的响应代码是什么这个 Action ？是不是404 Not Fou
http - HTTP 服务器应用程序如何优雅地拒绝 HTTP 管道请求？
是否有特定的(或约定的)HTTP 响应消息(或除断开连接之外的其他操作)来阐明服务器不接受 pipelined HTTP requests ？我正在寻找能让客户端停止流水线化它的请求并分别发送每个请
http - http ://*:80 and http://+:80有什么区别
在了解Web Deploy我遇到了一些讨论 http://+:80 和 http://*:80 的 netsh.exe 命令。这些是什么意思？最佳答案引自URLPrefix Strings (Wi
http - HTTP 删除操作失败的 HTTP 响应代码是什么？
我有一个带有 uri /api/books/122 的资源，如果在客户端为此资源发送 HTTP Delete 时该资源不存在，那么相应的响应代码是什么这个 Action ？是不是404 Not Fou
angularjs - $http.get 、 $http.post 、 $http.put 、 $http.delete $http.head 和 $http.jsonp 之间的区别
关闭。这个问题需要更多focused .它目前不接受答案。想改进这个问题吗？更新问题，使其只关注一个问题 editing this post . 关闭 8 年前。 Improve this qu
http - Mule HTTP 点的自定义 HTTP 方法
我使用 Mule 作为 REST API AMQP。我必须发送自定义请求方法:“PRINT”，但我收到: Status Code: 400 Bad Request The request could
http - 不同 HTTP 响应代码的示例 http url
我需要针对具有不同 HTTP 响应代码的 URL 测试我的脚本。我如何获取响应代码 300、303 或 307 等的示例/示例现有 URL？谢谢! 最佳答案您可以使用 httpbin为此目的。例
http - 将 HTTP 响应与其相应的 HTTP 流水线请求相匹配
我正在尝试编写一个程序来匹配 HTTP 请求及其相应的响应。似乎在大多数情况下一切都运行良好(当传输完全有序时，即使不是，通过使用 TCP 序列号)。我发现的唯一问题是当我有流水线请求时。在那之后，
http - 其他 HTTP 方法是否可以接受 HTTP 303？
RESTful Web Services鼓励使用 HTTP 303将客户端重定向到资源的规范表示。它仅在 HTTP GET 的上下文中讨论主题。这是否也适用于其他 HTTP 方法？如果客户端尝试对非
http - HTTP 客户端应该如何正确解析 *chunked* HTTP 响应主体？
当使用chunked HTTP传输编码时，为什么服务器需要同时写出chunk的字节大小并且后续的chunk数据以CRLF结尾？这不会使发送二进制数据“CRLF-unclean”和方法有点多余吗？如
http - 我可以在完全读取 HTTP 请求之前发送 HTTP 响应吗？
这个问题在这里已经有了答案: Is it acceptable for a server to send a HTTP response before the entire request has
http - 将 HTTP 请求映射到 HTTP 响应
如果我向同一台服务器发出多个 HTTP Get 请求并收到每个请求的 HTTP 200 OK 响应，我如何使用 Wireshark 判断哪个请求映射到哪个响应？目前看起来像是发出了一个 http 请
http - 传递给 http.HandleFunc 的函数如何访问 http.ResponseWriter 和 http.Request？
func main() { http.HandleFunc("/", handler) } func handler(w http.ResponseWriter, r http.Request
node.js - import http = require ('http' ); 之间的区别并从 'http' 导入 * 作为 http ；？
我找不到有值(value)的 NodeJS with Typescript 教程，所以我在无指导下潜入水中，果然我有一个问题。我不明白这两行之间的区别: import * as http from
http - HTTP 方法是否区分大小写？
问一个关于Are HTTP headers case-sensitive?的问题，如果 HTTP 方法区分大小写，大多数服务器如何处理“get”或“post”与“GET”或“POST”？例如，看起来
http - HTTP GET错误用户无效
我正在使用ASP.NET，在其中我通过动词GET接收查询，该应用程序专用于该URL。该代码有效，但是如果用户发送的密码使http 200无效，请回答我，并在消息的正文中显示“Fail user or
http - http.HandleFunc始终匹配“/”
Closed. This question needs details or clarity。它当前不接受答案。想改善这个问题吗？添加详细信息，并通过editing this post阐明问题。 9

首页

博学

6Ren·AI

商城

http-post - 使用 Ocamlnet 3 的正确方法 - Http_client.Convenience.http_post