我试图发送一个GET请求,思科ISE,但得到这个错误:415不支持的媒体类型HTTP
415 Unsupported Media Typen
我在做什么错?该API文档说:
Method: GET
URI: https://10.10.10.10:9060/ers/config/networkdevice/
HTTP 'Accept' header: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";
}
似乎它不同意媒体类型。 – 2017-02-16 13:34:16
文档说你需要一个'Accept'头,但是你发送了一个'Content-Type'。这是错误的标题。写一个答案。 – simbabque