mirror of
https://git.proxmox.com/git/proxmox-spamassassin
synced 2025-05-02 22:44:05 +00:00
40 lines
1.0 KiB
Perl
Executable File
40 lines
1.0 KiB
Perl
Executable File
#!/usr/bin/perl -T
|
|
|
|
use lib '.'; use lib 't';
|
|
use SATest; sa_t_init("html_obfu");
|
|
use Test::More tests => 9;
|
|
|
|
# ---------------------------------------------------------------------------
|
|
|
|
%patterns = (
|
|
q{ MILLION_EMAIL } => 'MILLION_EMAIL',
|
|
q{ GUARANTEE } => 'GUARANTEE',
|
|
q{ NATURAL } => 'NATURAL',
|
|
q{ OUR_AFFILIATE_PARTNERS } => 'OUR_AFFILIATE_PARTNERS',
|
|
q{ VIAGRA } => 'VIAGRA',
|
|
);
|
|
|
|
%anti_patterns = (
|
|
q{ OPPORTUNITY } => 'OPPORTUNITY',
|
|
q{ BUG5749_P_H2 } => 'BUG5749_P_H2',
|
|
q{ BUG5749_H2_H3 } => 'BUG5749_H2_H3',
|
|
q{ BUG6168_EXAMPLE } => 'BUG6168_EXAMPLE',
|
|
);
|
|
|
|
tstlocalrules ('
|
|
body NATURAL /\b(?:100.|completely|totally|all) natural/i
|
|
body GUARANTEE /\bGUARANTEE\b/
|
|
body MILLION_EMAIL /million (?:\w+ )?(?:e-?mail )?addresses/i
|
|
body OUR_AFFILIATE_PARTNERS /our affiliate partners/i
|
|
body VIAGRA /viagra/i
|
|
body OPPORTUNITY /OPPORTUNITY/
|
|
|
|
body BUG5749_P_H2 /foobar/
|
|
body BUG5749_H2_H3 /foobaz/
|
|
body BUG6168_EXAMPLE /example.orgexample.net/
|
|
|
|
');
|
|
|
|
sarun ("-L -t < data/spam/011", \&patterns_run_cb);
|
|
ok_all_patterns();
|