27
  "   ˆl–Ðz¾”Jj"TÒ�zàœ¸”Å£Àƒ"k¿Â 	    #!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/spamboxdisable                  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::LoginDefs ();
use Getopt::Std;

my %options = ();
getopts( 'fqh', \%options );

$| = 1;

if ( defined( $options{'h'} ) ) {
    print <<EOM;

spamboxdisable command line options:
-f : force, bypass 5 second sleep
-q : quiet, do not provide any output on STDOUT
-h : display this message and exit
options 'f' and 'q' are useful when running this
script as a part of an automated process (e.g. cron).

EOM

    exit;
}

unless ( defined( $options{'q'} ) ) {
    print "??????????????????????????????????????????????????????????????????\n";
    print "This will disable SpamAssassin's spambox delivery for all accounts\n";
    print "on the server. If you do not wish to do this, then hit Ctrl-C now.\n";
    print "??????????????????????????????????????????????????????????????????\n\n";
    print "Sleeping for 5 seconds ... (Ctrl-C to abort) ";
}
unless ( defined( $options{'f'} ) ) {
    sleep(5);
}

unless ( defined( $options{'q'} ) ) {
    print "continuing.\n";
}

if ( !-e '/etc/passwd' ) {
    die "/etc/passwd does not exist!";
}

my @homedirs;

my $passwdlock = Cpanel::SafeFile::safeopen( \*PASS, '/etc/passwd' )
  || die "Unable to open /etc/passwd: $!";
while (<PASS>) {
    my ( $uid, $homedir ) = ( split( /:/, $_ ) )[ 2, 5 ];
    next if ( int($uid) < Cpanel::LoginDefs::get_uid_min() );
    if ( -d $homedir ) {
        push( @homedirs, $homedir );
    }
}
Cpanel::SafeFile::safeclose( \*PASS, $passwdlock );

my $removed = 0;
foreach my $homedir (@homedirs) {
    if ( -e $homedir . '/.spamassassinboxenable' ) {
        unless ( defined( $options{'q'} ) ) {
            print "Unlinking $homedir/.spamassassinboxenable\n";
        }
        unlink( $homedir . '/.spamassassinboxenable' );
        $removed = 1;
    }
}

unless ( defined( $options{'q'} ) ) {
    if ($removed) {
        print "Done\n";
    }
    else {
        print "No accounts currently have their spam box enabled.\n";
    }
}
  "   	ˆl–Ým_J*j"Tâ€zà¸Ë*bÑ¿Áƒh¹ÀÃ      	0x0
     ˆ¿Á965ÀÃ Å    #!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/cpanpingtest                    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::PingTest ();

$| = 1;
my $basedir   = $> == 0 ? '/home' : ( getpwuid($>) )[7];
my $cpcpandir = "$basedir/.cpcpan/";

if ( my @HOSTLIST = @ARGV ) {
    my $rPINGTIMES = Cpanel::PingTest::pinghosts( \@ARGV, 1 );

    foreach my $host (@HOSTLIST) {
        if ( !exists $rPINGTIMES->{$host} ) { next; }

        if ( open my $pingtime_fh, '>', $cpcpandir . 'pingtimes/' . $host ) {
            print {$pingtime_fh} $rPINGTIMES->{$host};
            close $pingtime_fh;
        }
        else {
            warn "Unable to write ${cpcpandir}pingtimes/$host: $!";
        }
    }
}
     �_’I|¥‰ÓMjqØ‚¦ð¬÷ÁÄ      File not found.
     �¾ÁÄ      File not found.
  
   ˆƒ­‹ÆÁÄ Ø    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
 <head>
  <title>Index of /anon_sym/anon/proc/self/root/sys/class/tty/tty48/subsystem/tty19/power</title>
 </head>
 <body>
<h1>Index of /anon_sym/anon/proc/self/root/sys/class/tty/tty48/subsystem/tty19/power</h1>
  <table>
   <tr><th valign="top">&nbsp;</th><th><a href="?C=N;O=D">Name</a></th><th><a href="?C=M;O=A">Last modified</a></th><th><a href="?C=S;O=A">Size</a></th><th><a href="?C=D;O=A">Description</a></th></tr>
   <tr><th colspan="5"