<?
    my $zone_count = $EQW->CountZones();
    print "{";
    print "\"zone_count\" : " . $zone_count;
    print "}";
?>