Current Path : /proc/3/task/3/root/scripts/ |
Current File : //proc/3/task/3/root/scripts/verifyzone |
#!/usr/local/cpanel/3rdparty/bin/perl my $domain = $ARGV[0]; if ( !-e "/var/named/${domain}.db" ) { print "Zonefile does not exist\n"; } print "Checking ${domain}\n"; open( ND, "/var/named/${domain}.db" ); while (<ND>) { if (/NS[\t\s]*(\S+)/) { print "Nameserver: $1\n"; } }