perl - Perl と Net::SSLeay を使用したトークン リクエスト

Question

Perl と Net::SSLeay を使用して新しい REST API のトークンを要求しようとしています (私のプロバイダーは Net::SSLeay のみをサポートしており、NET::PayPal などのモジュールはインストールされていません) が、要求は失敗します。私は何を間違っていますか？特に、「grant_type」を設定するのは難しいと思います...

use Net::SSLeay qw(get_https make_form make_headers post_https);
use MIME::Base64;
use strict;

my $site = "api.sandbox.paypal.com";
my $port = "443";
my $path = "/v1/oauth2/token?grant_type=client_credentials";
my $uname = "my_client_id";
my $password = "my_secret";

$uname = encode_base64($uname);
$password = encode_base64($password);
my $cred = "Basic $uname:$password";

my ($page, $result, %headers) = post_https($site, $port, $path, make_headers(
'Accept'=>"application/json",
'Accept-Language'=>"en_US",
'Authorization'=>"$cred"
));

ここに誰か助けてくれる人はいますか？

よろしく、 ラース