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.