NAME

Mail::Decency::ContentFilter::Archive

DESCRIPTION

Archive module. Write a copy of the passing mail to archive directory on disk.

CONFIG

---

disable: 0

# possible variables are:
#   * recipient_domain .. eg recipient.tld
#   * recipient_prefix .. eg username
#   * recipient_address .. eg username@recipient.tld
#   * sender_domain .. eg username@recipient.tld
#   * sender_prefix .. eg username@domain.tld
#   * sender_adress .. eg username@domain.tld
#   * ymd .. eg 2010-05-24
#   * hm  .. eg 21-26 (= 21:26h)
archive_dir: '/var/archive/%recipient_domain%/%recipient_prefix%/%ymd%/%hm%/'
#archive_dir: '/var/archive/%ymd%/%recipient_domain%/%recipient_prefix%'

# wheter to drop the mail after archiving .. means: will not be
#   reinjected for delivery.
drop: 0

CLASS ATTRIBUTES

archive_dir : Str

Archive directory where the mails are stored in.

drop : Bool

If true, drop mails after archiving (do not forward them)

METHODS

init

handle

Archive file into archive folder

archive_mail

Write mail to archive directory.

build_dir

Builds dir based on variables.

normalize_str

Replace not allowed characters ..

AUTHOR

Ulrich Kautz <uk@fortrabbit.de>

COPYRIGHT

Copyright (c) 2010 the "AUTHOR" as listed above

LICENCSE

This library is free software and may be distributed under the same terms as perl itself.