Lines Matching refs:zones
7 if (!GetOptions($opt, qw/bdb|b:s input|i:s zones|z:s help|h/)) {
29 my $zone_list = $opt->{zones};
31 usage('Please specify a space seperated list of zones');
49 my @zones = split(/\s+/, $zone_list);
50 foreach my $zone (@zones) {
78 foreach my $zone (@zones) {
95 foreach my $zone (@zones) {
111 foreach my $zone (@zones) {
128 print STDERR "usage: $0 --bdb=<bdb-file> --input=<input-file> --zones=<zone-list>\n\n";
130 print STDERR "\tinput-file: The input text-file containing records to populate within your zones\n\n";
131 print STDERR "\tzone-list: The space-seperated list of zones you wish to create\n\n";