Perl Examples

ChilkatHOMEAndroid™ASPVisual BasicVB.NETC#iOS (IPhone)Objective-CC++CMFCDelphiFoxProJavaPerl
PHP ExtensionPHP ActiveXPythonPowerShellRubySQL ServerVBScript

Perl Examples

Quick Start
Unicode
Byte Array
Bz2
Certificates
CSV
Email
Encryption
FTP
HTML Conversion
HTTP
IMAP
MHT
MIME
POP3
RSA
S/MIME
Signatures
SMTP
Socket / SSL
Spider
SFTP
SSH Key
SSH
SSH Tunnel
Tar
HTTP Upload
XML
XMP
Zip

More Examples...
String
Amazon S3
Email Object
DKIM / DomainKey
NTLM
FileAccess
RSS
Atom
Self-Extractor
Service
PPMD
Deflate
DH Key Exchange
DSA
Bzip2
LZW

 

 

 

 

 

 

 

How to Examine the HTTP Header + Body for a POST to be sent

This example shows how to use GenerateRequestText to get the HTTP request (headers + body) that would be sent if SynchronousRequest was called with the HTTP request object.

Important: The hostnames and paths in this examples are not intended to be real examples. You should replace all hostnames, paths, etc. with valid data for your own Web service.

 Chilkat Perl Module Downloads for Windows, Linux, and MAC OS X

use chilkat();

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

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

#  Build an XMLHTTP request.  The XML passed to UseXmlHttp is sent
#  in the body of the request.
$req->UseXmlHttp("<test>This is the XML to be sent</test>");
$req->put_Path("/protus/xmlwebservices/xmlsubmitter/messaging.asmx");

#  Add a custom header:
$req->AddHeader("SOAPAction","https://www.notarealdomain.com/WebServices/Messaging/2005/2/SendSingleFax");

$requestText = $req->generateRequestText();

print $requestText . "\r\n";
print "----------------------" . "\r\n";

#  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.

$resp = $http->SynchronousRequest("www.notarealdomain.com",443,1,$req);
if ($resp eq null ) {
    print $http->lastErrorText() . "\r\n";
}
else {
    #  Display the body of the response.
    print $resp->bodyStr() . "\r\n";
}

 

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