|
Server : Apache/2.2.22 (Unix) mod_ssl/2.2.22 OpenSSL/1.0.0-fips mod_auth_passthrough/2.1 mod_bwlimited/1.4 System : Linux server.jackjohnson.com 2.6.32-279.5.2.el6.x86_64 #1 SMP Fri Aug 24 01:07:11 UTC 2012 x86_64 User : jackjohn ( 502) PHP Version : 5.3.17 Disable Function : NONE Directory : /scripts/ |
Upload File : |
#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel4 - scripts Copyright(c) 2011 cPanel, Inc..
# All rights Reserved.
# copyright@cpanel.net http://cpanel.net
# This code is subject to the cpanel license. Unauthorized copying is prohibited
my $ndc = find_namedconf();
sub find_namedconf {
if ( -e "/etc/namedb/named.conf" ) { return ("/etc/namedb/named.conf"); }
return ("/etc/named.conf");
}
my $im = 0;
my @CFILE;
open( NDC, "+<", "$ndc" );
while (<NDC>) {
if (/type slave/) {
s/slave/master/g;
}
if (/masters/) {
$im = 1;
}
if ( !$im ) { push( @CFILE, $_ ); }
if (/}/) {
$im = 0;
}
}
seek( NDC, 0, 0 );
print NDC join( "", @CFILE );
truncate( NDC, tell(NDC) );
close(NDC);