Perl
Perl
HTTP Session Logging
Demonstrates how to use the SessionLogFilename property to log HTTP requests and responses to a file.Chilkat Perl Downloads
use chilkat();
# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
$http = chilkat::CkHttp->new();
# Set the SessionLogFilename property so that the Chilkat HTTP component
# logs the exact HTTP requests and responses to a file.
# The SessionLogFilename may be used with any of the HTTP
# methods for sending GET, POST, PUT, DELETE, HEAD, etc.
$http->put_SessionLogFilename("c:/temp/httpSessionLog.txt");
# Try a simple HTTP GET and then examine the session log:
$html = $http->quickGetStr("http://www.chilkatsoft.com/httpTest/abc.html");
if ($http->get_LastMethodSuccess() != 1) {
print $http->lastErrorText() . "\r\n";
exit;
}
# The contents of the session log file after doing
# the GET request:
# ---- Sending ----
# GET /httpTest/abc.html HTTP/1.1
# Accept: */*
# Accept-Encoding: gzip
# Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7
# Accept-Language: en-us,en;q=0.5
# Host: www.chilkatsoft.com
# Connection: Keep-Alive
#
#
# ---- Received ----
# HTTP/1.1 200 OK
# Content-Length: 37
# Content-Type: text/html
# Last-Modified: Wed, 09 Dec 2009 14:55:08 GMT
# Accept-Ranges: bytes
# ETag: "4eecd499df78ca1:28b"
# Server: Microsoft-IIS/6.0
# X-Powered-By: ASP.NET
# Date: Wed, 09 Dec 2009 15:15:50 GMT
#
# <html>
# <body>
# ABC
# </body>
# </html>
#