$domain = "abc.com";
@zones = `dnscmd $domain /EnumZones`;
if ($?) {
print "Error "; }
else  "zones done";