Perl:使用REST::Client模块以编程方式设置POST参数

我已经构建了一个REST服务器，现在我想使用REST::Client模块从Perl Client中对其进行快速测试。

如果执行GET Request(在URL中明确设置参数)，则效果很好，但我不知道如何在POST Request中设置这些参数。

这是我的代码的样子:

#!/usr/bin/perl
use strict;
use warnings;

use REST::Client;

my $client = REST::Client->new();

my $request_url =  'http://myHost:6633/my_operation';

$client->POST($request_url);
print $client->responseContent();

我已经尝试过类似的东西:

$client->addHeader ('my_param' , 'my value');

但这显然是错误的，因为我不想设置HTTP预定义的 header 而是请求参数。

谢谢!

最佳答案

挺直截了当的。但是，您需要知道服务器需要什么样的内容。通常将是XML或JSON。

F.ex.如果您在第二个参数的 header 中告诉它JSON的内容，则可以与可以理解第二个参数的JSON的服务器一起使用。

$client->POST('http://localhost:3000/user/0/', '{ "name": "phluks" }', { "Content-type" => 'application/json'});

关于Perl:使用REST::Client模块以编程方式设置POST参数，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/3635288/