The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

mail_tempaddress_purge.pl - purge Mail::SimpleList::Alias object when they expire

SYNOPSIS

  mail_tempaddress_purge.pl directory [min_age] [-v]

DESCRIPTION

mail_simplelist_purge.pl applies the Purge role from Mail::Action::Role::Purge to a Mail::SimpleList::Aliases collection. This role allows the purging of expired Mail::SimpleList::Alias objects. This program is intended to be run on a regular basis from cron or a similar facility.

When run the number of aliases present in the address directory before the purge and the number of aliases purged will be listed to the terminal.

ARGUMENTS

The only required argument is the directory in which the aliases are stored. This is the same as the argument to the Mail::TempAddress constructor. For safety it is recommended that this be a absolute directory path.

OPTIONS

A minimum time that each address has been expired for may be passed as an optional argument. The time may be in seconds or a freeform expression such as "1h30m" or "2m1w".

If -v or --verbose is passed then the aliases present will be listed to the terminal both before and after the purge.

AUTHOR

James FitzGibbon, <jfitz@CPAN.ORG>

COPYRIGHT

Copyright (c) 2003, James FitzGibbon. This program is free software; you may use/modify it under the same terms as Perl itself.