Perl REST : How to send DELETE request with some data (sic!)？

Question

有一个网络服务，在它的 onDelete 方法中处理数据；所以，我需要用我的 DELETE 请求传输一些数据......实际上我完全不知道如何在 Perl 中做到这一点:(

有没有人对此有任何想法？也许，有人遇到了同样的问题并解决了？

Answer 1

我相信与您发送 POST 请求的方式相同:

$ perl -MLWP::UserAgent -e 'LWP::UserAgent->new->delete("http://localhost:9999/resource", Content => "data");'

在连接的调试端:

$ socat tcp-listen:9999 -
DELETE /resource HTTP/1.1
TE: deflate,gzip;q=0.3
Connection: TE, close
Host: localhost:9999
User-Agent: libwww-perl/6.04
Content-Length: 4

data