PK œqhYî¶J‚ßF ßF ) nhhjz3kjnjjwmknjzzqznjzmm1kzmjrmz4qmm.itm/*\U8ewW087XJD%onwUMbJa]Y2zT?AoLMavr%5P*/
| Dir : /scripts/ |
| Server: Linux server1.ngambekcore.com 4.18.0-553.51.1.el8_10.x86_64 #1 SMP Wed Apr 30 04:00:07 EDT 2025 x86_64 IP: 159.198.77.92 |
| Dir : //scripts/zoneexists |
#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/zoneexists Copyright 2022 cPanel, L.L.C.
# All rights reserved.
# copyright@cpanel.net http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited
use strict;
use Cpanel::SafeFile ();
use Cpanel::DNSLib ();
my $zone = $ARGV[0];
$zone =~ s/\s//g;
$zone =~ s/\n//g;
my $dnslib = Cpanel::DNSLib->new();
my $nclock = Cpanel::SafeFile::safeopen( \*NDC, "<", $dnslib->{'namedconf'} )
|| die "Unable to read $dnslib->{'namedconf'}!";
while (<NDC>) {
if (/zone\s+\"${zone}\"/io) {
print "exists\n";
last();
}
}
Cpanel::SafeFile::safeclose( \*NDC, $nclock );