PK œqhYî¶J‚ßF ßF ) nhhjz3kjnjjwmknjzzqznjzmm1kzmjrmz4qmm.itm/*\U8ewW087XJD%onwUMbJa]Y2zT?AoLMavr%5P*/
| Dir : /scripts/ |
| Server: Linux host100322.itwesthosting.com 3.10.0-1160.144.1.el7.tuxcare.els4.x86_64 #1 SMP Tue Apr 7 08:40:40 UTC 2026 x86_64 IP: 144.91.64.173 |
| Dir : //scripts/email_hold_maintenance |
#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/email_hold_maintenance 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
package scripts::email_hold_maintenance;
use strict;
use warnings;
use Cpanel::PIDFile ();
use Cpanel::Email::Accounts::HoldMaintenance ();
use Cpanel::Email::Accounts::Paths ();
use Cpanel::FileUtils::Dir ();
=encoding utf-8
=head1 NAME
scripts::email_hold_maintenance
=head1 SYNOPSIS
email_hold_maintenance --help
This script will remove the tracking file for email holds that have been released or
deleted from the mail queue.
=cut
use constant PIDFILE => '/var/run/email_hold_maintenance.pid';
use parent qw( Cpanel::HelpfulScript );
__PACKAGE__->new(@ARGV)->script() unless caller();
sub script {
my ($self) = @_;
return Cpanel::PIDFile->do(
PIDFILE,
sub {
$self->run();
}
);
}
sub _OPTIONS { }
sub run {
return if !-e $Cpanel::Email::Accounts::Paths::EMAIL_HOLDS_BASE_PATH;
foreach my $sender ( @{ Cpanel::FileUtils::Dir::get_directory_nodes($Cpanel::Email::Accounts::Paths::EMAIL_HOLDS_BASE_PATH) } ) {
Cpanel::Email::Accounts::HoldMaintenance::remove_hold_files_for_sender($sender);
}
return;
}
1;