Perl Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++CMFCDelphiFoxProJavaPerlPHPPythonRubySQL ServerVBScript

Perl Examples

Quick Start
Perl Unicode
Perl Byte Array
Perl Certs
Perl Email
Perl Encryption
Perl FTP
HTML-to-XML
Perl HTTP
Perl IMAP
Perl MHT
Perl MIME
Perl RSA
Perl S/MIME
Perl Signatures
Perl Socket
Perl Spider
Perl Tar
Perl Upload
Perl XML
Perl XMP
Perl Zip

More Examples...
String
Email Object
POP3
SMTP
RSS
Atom
Self-Extractor

Unreleased...
Service
PPMD
Deflate
Bzip2
LZW
Bz2
DH Key Exchange
DSA
Icon

 

 

 

 

 

 

 

Amazon AIM - Generate Order Fulfillment Report

Amazon AIM API -- Generate an Order Fulfillment Report

Download Chilkat Perl Module

use chilkat;

$req = new chilkat::CkHttpRequest();
$http = new chilkat::CkHttp();

#  Any string unlocks the component for the 1st 30-days.
$success = $http->UnlockComponent("Anything for 30-day trial");
if ($success != 1) {
    print $http->lastErrorText() . "\n";
    exit;
}

#  The CookieDir may be set to "memory" to keep an in-memory cache of cookies.
#  Alternatively, you may set it to a directory, such as "c:/temp/cookies".  If you do that,
#  you can visually browse the cookies which will appear as XML files in the CookieDir.
$http->put_CookieDir("memory");

#  Tell the HTTP component to save any cookies received.  Also tell the component to
#  re-send cookies with subsequent GETs and POSTs.
$http->put_SendCookies(1);
$http->put_SaveCookies(1);

#  Build an HTTP POST Request:
$req->UsePost();
$req->put_Path("/exec/panama/seller-admin/manual-reports/generate-report-now");

#  Setting your login/password causes Chilkat to automatically add the Authorization header:
$http->put_Login("MyLogin");
$http->put_Password("MyPassword");

$req->AddHeader("Content-Type","text/xml");

$req->AddHeader("NumberofDays","30");
$req->AddHeader("ReportName","Order");

#  Send the HTTP POST and get the response.  Note: This is a blocking call.
#  The method does not return until the full HTTP response is received.

$domain = "merchant-query.amazon.com";
$port = 443;
$ssl = 1;

$resp = $http->SynchronousRequest($domain,$port,$ssl,$req);
if ($resp eq null ) {
    print $http->lastErrorText() . "\r\n";
}
else {
    #  Display the XML returned.
    print $resp->bodyStr() . "\r\n";
}

 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2007 Chilkat Software, Inc. All Rights Reserved.