Linux server.jmdstrack.com 3.10.0-1160.119.1.el7.tuxcare.els10.x86_64 #1 SMP Fri Oct 11 21:40:41 UTC 2024 x86_64
/ scripts/ |
|
#!/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 );