Perl

OCSP Check Domain's Server Certificate Revocation Status

See more HTTP Examples

Sends an OCSP request to determine the revocation status for an SSL server certificate. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

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

my $http = Chilkat2::Http->new;

# Check the revocation status of the SSL server certificate for chilkatsoft.com
my $status = $http->OcspCheck('chilkatsoft.com', 443);

print 'chilkatsoft.com status = ', $status, "\n";

# The status can have 4 values:
# -1: Unable to check because of an error.
#  0: Good
#  1: Revoked
#  2: Unknown

if ($status < 0) {
    print $http->LastErrorText, "\n";
}

# Now check the status for a revoked server certificate.
$status = $http->OcspCheck('revoked.badssl.com', 443);

print 'revoked.badssl.com status = ', $status, "\n";