(Perl) Adding an Authorization Bearer (Token) Header to HTTP Requests

Demonstrates how to add a token to HTTP requests for authorization.

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$http = chilkat::CkHttp->new();

# Setting the AuthToken property causes the "Authorization: Bearer <token>" header to be added to each request.
# This applies to any of the Chilkat method calls that send a GET, POST, PUT, PATCH, or anything else..
$http->put_AuthToken("ya29.a0Ad52N3_4P_LpZS......WZr44LJ6w017");

# For example:
$responseStr = $http->quickGetStr("https://www.chilkatsoft.com/helloWorld.xml");
print $responseStr . "\r\n";

# The following HTTP request is sent in the above call.

# GET /helloWorld.xml HTTP/1.1
# Host: www.chilkatsoft.com
# Accept: */*
# Accept-Encoding: gzip
# Authorization: Bearer ya29.a0Ad52N3_4P_LpZS......WZr44LJ6w017