2

我正在尝试向 Cisco ISE 发送 GET 请求，但收到此错误：

415 不支持的媒体类型

我究竟做错了什么？API 文档说：

方法：获取

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

HTTP“接受”标头：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";
}
4

2 回答 2

2

您的文档说您应该发送Accept具有该长类型的标头。

HTTP“接受”标头：application/vnd.com.cisco.ise.network.networkdevice.1.0+xml

Accept是您的客户端将在响应中接受的内容类型。但是您将其用作Content-TypeGET 请求中的标头。这是没有意义的，因为 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' ],
);
于 2017-02-16T13:40:43.307 回答
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);

您必须发送Accept标头而不是Content-Type。

于 2017-02-16T13:44:42.007 回答