Perl

HTTP/HTTPS using SOCKS4 Proxy

See more HTTP Examples

Demonstrates how to use HTTP/HTTPS with a SOCKS4 proxy. Perl

use chilkat();

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

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

# Using a SOCKS4 proxy is just a matter of setting a few properties.
# Once these properties are set, all other coding is the same as when
# the connection is direct to the HTTP server.

# Set the SocksVersion property = 4 for SOCKS4
$http->put_SocksVersion(4);

# Set the SocksHostname to the SOCKS proxy domain name or IP address, 
# which may be IPv4 (dotted notation) or IPv6.
$http->put_SocksHostname("192.168.1.100");

# The port where the SOCKS4 proxy is listening.
$http->put_SocksPort(1080);

# Now do whatever it is you need to do.  All communications will go through the proxy.
$html = $http->quickGetStr("https://www.baidu.com/");
if ($http->get_LastMethodSuccess() != 1) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

print $html . "\r\n";
print "----" . "\r\n";
print "Success!" . "\r\n";