(Perl) Bluzone Get List of Beacons

Get beacons for a project.

For more information, see https://bluzone.io/portal/static/docs/index.html#_getbeaconsbyprojectid

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

use chilkat();

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

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

# Implements the following CURL command:

# curl -X GET \
#   https://bluzone.io/portal/papis/v1/projects/YOUR_PROJECT_ID_HERE/devices/beacons \
#   -H 'bzid: YOUR_API_KEY_HERE'

$http->SetRequestHeader("bzid","YOUR_API_KEY_HERE");

$sbResponseBody = chilkat::CkStringBuilder->new();
$success = $http->QuickGetSb("https://bluzone.io/portal/papis/v1/projects/YOUR_PROJECT_ID_HERE/devices/beacons",$sbResponseBody);
if ($success == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

print "Response body:" . "\r\n";
print $sbResponseBody->getAsString() . "\r\n";