我正在尝试向思科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";
}
答案 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);
您必须发送接受标题,而不是内容类型。