文件操作 - zoneexists
返回文件管理
返回主菜单
删除本文件
文件: /usr/local/cpanel/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 );
修改文件时间
将文件时间修改为当前时间的前一年
删除文件