| Net::Sieve::Script::Condition(3pm) | User Contributed Perl Documentation | Net::Sieve::Script::Condition(3pm) |
Net::Sieve::Script::Condition - parse and write conditions in sieve scripts
use Net::Sieve::Script::Condition;
my $cond = Net::Sieve::Script::Condition->new('header');
$cond->match_type(':contains');
$cond->key_list('"[Test4]"');
$cond->header_list('"Subject"');
print $cond->write();
or
my $cond = Net::Sieve::Script::Condition->new(
'anyof (
header :contains "Subject" "[Test]",
header :contains "Subject" "[Test2]")'
);
print $cond->write();
Parse and write condition part of Sieve rules, see Net::Sieve::Script.
Support RFC 5228, 5231 (relationnal) and regex draft
Match and set accessors for each condition object in conditions tree, "test" is mandatory
Internal
id : id for condition, set by creation order condition : array of sub conditions parent : parent of sub condition AllConds : array of pointers for all conditions
Condition parts
not : 'not' or nothing
test : 'header', 'address', 'exists', ...
key_list : "subject" or ["To", "Cc"]
header_list : "text" or ["text1", "text2"]
address_part : ':all ', ':localpart ', ...
match_type : ':is ', ':contains ', ...
comparator : string part
Purpose : test conditions Return : 1 on equals conditions
Purpose : write rule conditions in text format Return : multi-line formatted text
Yves Agostini
CPAN ID: YVESAGO
yvesago@cpan.org
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
| 2022-06-30 | perl v5.34.0 |