Select Code to Download

{
    "Datapoints": [
...
    ],
    "Label": "DatabaseConnections"
}

#!/usr/bin/perl

...
#print encode_json($perl_scalar);
print $json->utf8->encode($perl_scalar);

{"Datapoints":[{"Average":145.8,"Timestamp":"2017-03-01T04:05:00Z","Un
+it":"Count"},{"Av
erage":182.2,"Timestamp":"2017-03-01T10:35:00Z","Unit":"Count"},{"Aver
+age":108,"Timesta
...
.8,"Timestamp":"2017-03-01T23:00:00Z","Unit":"Count"}

...and more of the same till the end