Perl

Replace or Remove Default HTTP Headers

See more HTTP Examples

Shows how to replace or remove default HTTP headers.

Also see: Chilkat Http Default and Auto-Filled Headers

Perl

use chilkat();

$success = 0;

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

$http = chilkat::CkHttp->new();

# The following request will be sent.
# The Accept and Accept-Encoding headers are default headers added by Chilkat.

# GET /helloWorld.txt HTTP/1.1
# Host: chilkatsoft.com
# Accept: */*
# Accept-Encoding: gzip

$responseBody = $http->quickGetStr("https://chilkatsoft.com/helloWorld.txt");
# Examine the request header we just sent..
print $http->lastHeader() . "\r\n";
print "----" . "\r\n";

# Remove the default headers:
$http->RemoveRequestHeader("Accept");
$http->RemoveRequestHeader("Accept-Encoding");

# Send a request with the following header:

# GET /helloWorld.txt HTTP/1.1
# Host: chilkatsoft.com

$responseBody = $http->quickGetStr("https://chilkatsoft.com/helloWorld.txt");
print $http->lastHeader() . "\r\n";