./X140N PRIV8 SHELL


	: 216.73.216.124
	: 188.40.95.74 / mail.vlasotince.tv
	: Linux cp01.striminghost.net 3.10.0-1160.119.1.el7.tuxcare.els13.x86_64 #1 SMP Fri Nov 22 06:29:45 UTC 2024 x86_64

: /scripts/

files >> //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 );