(Perl) Send HTTPS POST with XML Body

Demonstrates how to send an HTTP (or HTTPS) POST where the body of the request is XML.

Note: This example requires Chilkat v11.0.0 or greater.

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

use chilkat();

$success = 0;

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

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

$strXml = "<TransactionSetup xmlns=\"https://xyz.com\"><Credentials><AccountID>XXX</AccountID></Credentials></TransactionSetup>";

# Maybe you need other headers?
$http->SetRequestHeader("Accept","application/xml");

$resp = chilkat::CkHttpResponse->new();
$success = $http->HttpStr("POST","https://www.somewebsite.com/",$strXml,"utf-8","application/xml",$resp);
if ($success == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

# Examine the response status code:
print "response status code = " . $resp->get_StatusCode() . "\r\n";

# Examine the response body:
print "response body: " . $resp->bodyStr() . "\r\n";