| Email-Delete documentation | view source | Contained in the Email-Delete distribution. |
Email::Delete::Maildir - Delete Messages from a Maildir Folder
use Email::Delete qw[delete_message];
my $message_id = shift @ARGV;
delete_messages from => 'some/Maildir/',
matching => sub {
my $message = shift;
$message->header('Message-ID') =~ $message_id;
};
This software will delete messages from a given Maildir folder.
Email::Delete, perl.
Casey West, <casey@geeknest.com>.
Copyright (c) 2004 Casey West. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| Email-Delete documentation | view source | Contained in the Email-Delete distribution. |