REST ::客戶端給出錯誤500不是SCALAR引用

Question

我是REST :: Client模塊的新手。 我做了一個腳本，將通過上述模塊調用API。下面

是我的腳本：

use REST::Client; 
use Data::Dumper; 

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

my $resp = $client->request(
    'POST', 
    "https://api.icims.com/customers/{ID}/search/people", 
    { 
     'Connection' => 'close', 
     'Link'  => 'https://api.icims.com/customers/{ID}/people/;rel="person"; 
    title="Person Profile"', 
     'Content-Length' => '280', 
     'Content-Type'  => 'application/json', 
     'Content-Encoding' => 'gzip', 
     'Host'    => 'api.icims.com', 
     'User-Agent'  => 'Apache-HttpClient/4.2.1 (java 1.5)', 
     'Accept-Encoding' => 'gzip,deflate', 
     Accept    => 'application/json' 
    } 
); 

print Dumper($resp->{_res}->{_content}); 

，這是印刷如下回應：

$VAR1 = '500 Not a SCALAR reference'; 

請建議。

Answer 1

您錯過了正文您的請求。 A POST request with REST::Client應該有身體第一，然後可選標題。

POST（$網址，[$ body_content，％$頭]）

瓶坯HTTP POST將所指定的資源。採用自定義請求標頭的可選正文內容和hashref。

由於您似乎沒有身體，只需使用undef即可。

my $resp = $client->request(
    'POST', 
    "https://api.icims.com/customers/{ID}/search/people", 
    undef,            # here 
    { 
     'Connection' => 'close', 
     'Link'  => 'https://api.icims.com/customers/{ID}/people/;rel="person";title="Person Profile"', 
     'Content-Length' => '280', 
     'Content-Type'  => 'application/json', 
     'Content-Encoding' => 'gzip', 
     'Host'    => 'api.icims.com', 
     'User-Agent'  => 'Apache-HttpClient/4.2.1 (java 1.5)', 
     'Accept-Encoding' => 'gzip,deflate', 
     Accept    => 'application/json' 
    } 
); 

這可能是更好的使用POST方法。它更容易閱讀。

my $resp = $client->POST(
    "https://api.icims.com/customers/ID/search/people", 
    undef, 
    { ... } 
);