(Perl) Duo Auth API - Ping

See more Duo Auth MFA Examples

The /ping endpoint acts as a "liveness check" that can be called to verify that Duo is up before trying to call other Auth API endpoints.

For more information, see https://duo.com/docs/authapi#/ping

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

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

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

$http->put_Accept("application/json");

# Use your own hostname here:
$url = "https://api-a03782e1.duosecurity.com/auth/v2/ping";

$jsonStr = $http->quickGetStr($url);
if ($http->get_LastMethodSuccess() == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

print "status code = " . $http->get_LastStatus() . "\r\n";
print $jsonStr . "\r\n";

# Sample successful output:

# status code = 200
# {"response": {"time": 1632358295}, "stat": "OK"