if ($?) { print "Error "; } else "zones done"; [download]
You are still missing curlies.
In reply to Re^3: DNScmd in perl script by shmem in thread DNScmd in perl script by ajd335