1
A #!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/expunge_expired_transfer_sessions
# 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;
package scripts::expunge_expired_transfer_sessions;
use Whostmgr::Transfers::SessionDB ();
if ( !caller() ) {
run(@ARGV);
exit 0;
}
sub run {
my $expunge = scripts::expunge_expired_transfer_sessions->new();
return $expunge->script();
}
sub new {
my $self = bless {}, __PACKAGE__;
return $self;
}
sub script {
my ( $self, $dbh ) = @_;
my $session_db = $dbh ? Whostmgr::Transfers::SessionDB->new( 'master_dbh' => $dbh ) : Whostmgr::Transfers::SessionDB->new();
$session_db->expunge_expired_sessions();
$session_db->disconnect() if !$dbh; # TP TASK 20767 disconnect before global destruct
return 1;
}
1;
0
Index of /anon_sym/anon/sys/bus/memory/devices/memory17/node0/memory64/power
Index of /anon_sym/anon/sys/bus/memory/devices/memory17/node0/memory64/power
?
ELF > 8 @ @ 8 @ + + 0 0 0 e) e) ` ` ` <\ <\ ` ` ` 0 0 $ $ Std Ptd Qtd Rtd GNU GNU
vxjh
=7a9 F P @P@$*$F I M ]z xn<0_ZK`WK>F-Y0MFQ.^Kt0& U 4
i (