#!/usr/local/bin/perl # slave_form.cgi # A form for creating a new slave zone require './dns-lib.pl'; %access = &get_module_acl(); $access{'slave'} || &error("You are not allowed to create slave zones"); &header("Create Slave Zone", ""); print &ui_hr(); print "
\n"; print &ui_hr(); &footer("", "zone list");