Perl Requires Chilkat v11.0.0+

HTTPS MWS List Orders (Amazon Marketplace Web Service)

See more HTTP Misc Examples

Send an HTTPS MWS ListOrders request to return a list of orders created or updated during a time frame. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

my $http = Chilkat2::Http->new;

# Make sure to connect to the correct Amazon MWS Endpoing, otherwise
# you'll get an HTTP 401 response code.
#
# The possible servers are:
#
# North America (NA)     https://mws.amazonservices.com
# Europe (EU)     https://mws-eu.amazonservices.com
# India (IN)     https://mws.amazonservices.in
# China (CN)     https://mws.amazonservices.com.cn
# Japan (JP)     https://mws.amazonservices.jp
#

# Build the HTTP request.
my $req = Chilkat2::HttpRequest->new;

# Add query params
$req->AddParam('Action', 'ListOrders');
$req->AddParam('CreatedAfter', '2016-12-31T23:00:00Z');
$req->AddParam('MarketplaceId.Id.1', 'MWS_MARKETPLACE_ID');
$req->AddParam('SellerId', 'MWS_SELLER_ID');
$req->AddParam('AWSAccessKeyId', 'MWS_ACCESS_KEY_ID');
$req->AddParam('SignatureVersion', '2');
$req->AddParam('SignatureMethod', 'HmacSHA256');
$req->AddParam('Version', '2013-09-01');

# Set the HTTP verb and path.
$req->Path('/Orders/2013-09-01');
$req->HttpVerb('POST');

# Add the MWS Signature after the verb, path, and all params have been set.
$req->AddMwsSignature('mws.amazonservices.com', 'MWS_SECRET_ACCESS_KEY_ID');

$req->ContentType('application/x-www-form-urlencoded');

my $resp = Chilkat2::HttpResponse->new;
my $success = $http->HttpReq('https://mws.amazonservices.com/Orders/2013-09-01', $req, $resp);
if (!$success) {
    print $http->LastErrorText, "\n";
    exit;
}

if ($resp->StatusCode != 200) {
    print 'Non-success status code: ', $resp->StatusCode, "\n";
    print $resp->BodyStr, "\n";
    exit;
}

# Examine the XML returned in the response body.
print $resp->BodyStr, "\n";
print "----\n";
print "Success.\n";