Mail::SortMail::Sort is a Perl module to split incoming mail according to header matching conditions. | |
Download |
Mail::Sort Ranking & Summary
Advertisement
- License:
- Perl Artistic License
- Price:
- FREE
- Publisher Name:
- Ian Zimmerman
- Publisher web site:
- http://search.cpan.org/~thedevil/Mail-Sort-20070404/Sort.pod
Mail::Sort Tags
Mail::Sort Description
Mail::Sort is a Perl module to split incoming mail according to header matching conditions. Mail::Sort is a Perl module to split incoming mail according to header matching conditions.SYNOPSIS use Mail::Sort; $sort = new Mail::Sort(test => 0, logfile => "$ENV{HOME}/sortlog", loglevel => 2); $spool = "$ENV{HOME}/Mail"; $sort->lock("$ENV{HOME}/one_at_a_time_please"); $sort->unlock("$ENV{HOME}/one_at_a_time_please"); $sort->deliver("| formail >> $spool/junk") if $sort->header_match('from', 'spammer'); $sort->deliver("| formail >> $spool/work", keep => 1) if $sort->destination_address('me@work.com'); $sort->deliver("| formail >> $spool/list", label => 'cool list') if $sort->sender_match('owner-coollist@lists.r.us'); $sort->forward("boss@work.com") if $sort->header_match('subject', 'accept credit cards'); $sort->ignore() if grep { $_ =~ /make money/ } @{$sort->{body}}; exit(1); Requirements: · Perl
Mail::Sort Related Software