$gdnsmapfile->print(" datacenters => [" . join(",", sort(keys(%$clusters))) . "]\n");
$gdnsmapfile->print(" map => {\n");
$gdnsmapfile->print(" default => [" . join(",", sort(map { $_->{name} } grep { $_->{default} } values(%$clusters))) . "]\n");
$gdnsmapfile->print(" datacenters => [" . join(",", sort(keys(%$clusters))) . "]\n");
$gdnsmapfile->print(" map => {\n");
$gdnsmapfile->print(" default => [" . join(",", sort(map { $_->{name} } grep { $_->{default} } values(%$clusters))) . "]\n");