415不支持的媒体类型HTTP

时间:2017-02-16 13:25:09

标签: xml perl http-status-code-415

我正在尝试向思科ISE发送GET请求,但收到此错误:

  

415不支持的媒体类型

我做错了什么? API文档说:

  

方法:GET

     

URI:https://10.10.10.10:9060/ers/config/networkdevice/

     

HTTP'Accept'标题:application / vnd.com.cisco.ise.network.networkdevice.1.0 + xml

因此,我应该能够以XML格式接收数据。

我已经尝试过这样做了:

$header->header(
    'Content-Type'=>'application/vnd.com.cisco.ise.network.networkdevice.xml');
$header->header(
    'Content-Type'=>'application/vnd.com.cisco.ise.network.networkdevice.1.0+xml');

每次出现上述错误都没有效果。

这是我的完整代码。

use strict;
use warnings;
use JSON -support_by_pp;
use LWP 5.64;
use LWP::UserAgent;
use MIME::Base64;
use REST::Client;
use IO::Socket::SSL;
use HTTP::Headers;

#So dass es auch ohne SSL Sertifizierung funktioniert
BEGIN { $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0 }
#Create a user agent object
my $ua = LWP::UserAgent->new(ssl_opts=> {
SSL_verify_mode => SSL_VERIFY_NONE(),
verify_hostname => 0,
                                              }
                                        );

#Create a request
my $uri='https://10.10.10.10:9060/ers/config/networkdevice';
my $header = HTTP::Headers->new;
$header->header('Content-Type'=>'application/vnd.com.cisco.ise.network.networkdevice');
my $req = HTTP::Request->new('GET', $uri, $header);
$req-> authorization_basic("user", "user");

#Pass request to the user agent and get a response back
my $res = $ua->request($req);

#Check the outcome of the response
if ($res->is_success) {
  print $res->content;
} else {
   print $res->status_line, "n";
}

2 个答案:

答案 0 :(得分:2)

您的文档说您应该使用该长类型发送Accept标题。

  

HTTP'接受'标题:应用/ vnd.com.cisco.ise.network.networkdevice.1.0 + xml的

Accept是您的客户在响应中接受的内容类型。但是您将其用作GET请求中的Content-Type标头。这没有任何意义,因为GET请求没有正文。因此,它没有内容,也没有内容的类型。

API响应415 Unsupported Media Type这一事实有点奇怪。它也可以忽略这一点。我们无法知道开发人员选择这样做的原因。

要解决您的问题,请将您的请求更改为使用Accept标头而不是Content-Type

my $header = HTTP::Headers->new;
$header->header(Accept => 'application/vnd.com.cisco.ise.network.networkdevice.1.0+xml');
my $req = HTTP::Request->new('GET', $uri, $header);

请注意,您不必显式创建自己的HTTP :: Headers对象。对于这个简单的请求,您可以将带有键/值对的数组ref传递给HTTP::Request->new

my $req = HTTP::Request->new(
    'GET', 
    $uri, 
    [ Accept =>'application/vnd.com.cisco.ise.network.networkdevice.1.0+xml' ],
);

答案 1 :(得分:0)

更正后的代码

#Create a request
my $uri='https://10.10.10.10:9060/ers/config/networkdevice';

my $req = HTTP::Request->new('GET', $uri);

$req->header('Accept'=>'application/vnd.com.cisco.ise.network.networkdevice.1.0+xml');

$req->authorization_basic("user", "user");

#Pass request to the user agent and get a response back
my $res = $ua->request($req);

您必须发送接受标题,而不是内容类型