Parse and write actions in sieve scripts
use Net::Sieve::Script::Action;
$action = Net::Sieve::Script::Action->new('redirect "[email protected]"');
or
$action = Net::Sieve::Script::Action->new(); $action->command('redirect'); $action->param('"[email protected]"');
Action object for Net::Sieve::Script, with command and optional param.
Support \s-1RFC\s0 5228, \s-1RFC\s0 5230 (vacation), regex draft
Argument : "command param" string,
parse valid commands from RFCs, param are not validate.
read command : \*(C`$action->command()\*(C'
set command : \*(C`$action->command('stop')\*(C'
read param : \*(C`$action->param()\*(C'
set param : \*(C`$action->param(' :days 3 "I am away this week."')\*(C'
return 1 if actions are equals
Yves Agostini - Univ Metz - <[email protected]>
<http://www.crium.univ-metz.fr>
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 \s-1LICENSE\s0 file included with this module.