Server : Apache System : Linux server2.corals.io 4.18.0-348.2.1.el8_5.x86_64 #1 SMP Mon Nov 15 09:17:08 EST 2021 x86_64 User : corals ( 1002) PHP Version : 7.4.33 Disable Function : exec,passthru,shell_exec,system Directory :  /scripts/

Upload File : current_dir [ Writeable ] document_root [ Writeable ]

#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/test_sa_compiled                Copyright 2022 cPanel, L.L.C.
#                                                           All rights reserved.
# [email protected]                                         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";
};