Chilkat Examples

ChilkatHOMEAndroid™Classic ASPCC++C#C# UWP/WinRTDataFlexDelphi ActiveXDelphi DLLVisual FoxProJavaLianjaMFCObjective-CPerlPHP ActiveXPHP ExtensionPowerBuilderPowerShellPureBasicCkPythonPythonRubySQL ServerSwiftTclUnicode CUnicode C++Visual Basic 6.0VB.NETVB.NET UWP/WinRTVBScriptXojo PluginNode.js

Perl Examples

Async
Certificates
ECC
Email Object
Encryption
FTP
HTML-to-XML/Text
Gzip
HTTP
IMAP
JSON
MHT / HTML Email
PEM
PFX/P12
Java KeyStore (JKS)
POP3
RSA Encryption
MIME
REST
SCP
SMTP
Socket/SSL/TLS
SSH Key
SSH
SFTP
Stream
Tar Archive
XML
XMP
Zip

More Examples...
Google APIs
Google Cloud Storage
Azure Cloud Storage
Amazon S3 (new)
Google Drive
ASN.1
PRNG
Amazon S3
Bounced Email
CSV
Diffie-Hellman
DKIM / DomainKey
DSA
NTLM
QuickBooks

 

 

 

 

 

 

 

(Perl) HTTP PUT JSON

Demonstrates how to send a JSON PUT and get the JSON response body.

Chilkat Perl Downloads

Perl Module for Windows, Linux, MAC OS X, Solaris, and FreeBSD

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() . "\r\n";
    exit;
}

#  The PUT request to be sent will look like this:
#  
PUT /request HTTP/1.1
Content-Type: application/jsonrequest
Cookie: JSESSIONID=1234
Content-Encoding: identity
Host: json.penzance.org
Accept: application/jsonrequest
Accept-Encoding:
Content-Length: 72

{"user":"doctoravatar@penzance.com","forecast":7,"t":"vlIj","zip":94089}
# First, remove default header fields that would be automatically # sent. (These headers are harmless, and shouldn't need to # be suppressed, but just in case...) $http->put_AcceptCharset(""); $http->put_UserAgent(""); $http->put_AcceptLanguage(""); # Suppress the Accept-Encoding header by disallowing # a gzip response: $http->put_AllowGzip(0); # If a Cookie needs to be added, it may be added by calling # AddQuickHeader: $success = $http->AddQuickHeader("Cookie","JSESSIONID=1234"); # Add the Content-Encoding: identity header. $success = $http->AddQuickHeader("Content-Encoding","identity"); # Modify the default "Accept" header: $http->put_Accept("application/jsonrequest"); $jsonText = '{\'user\':\'doctoravatar@penzance.com\',\'forecast\':7,\'t\':\'vlIj\',\'zip\':94089}'; # To use SSL/TLS, simply use "https://" in the URL. # IMPORTANT: Make sure to change the URL, JSON text, # and other data items to your own values. The URL used # in this example will not actually work. $responseBody = $http->putText("http://json.penzance.org/request",$jsonText,"utf-8","application/jsonrequest",0,0); if ($http->get_LastMethodSuccess() != 1) { print $http->lastErrorText() . "\r\n"; } else { # Display the JSON response. print $responseBody . "\r\n"; }
 

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