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

NAME

POE::Filter::Log::Procmail - filter for processing procmail logs

SYNOPSIS

  use POE::Filter::Log::Procmail;

  $filter = POE::Filter::Log::Procmail->new(Debug => 1);
  $arrayref_of_hashrefs = $filter->get($arrayref_of_raw_chunks_from_driver);

DESCRIPTION

The Log::Procmail filter translates procmail record streams to hashrefs.

PUBLIC FLITER METHODS

new

new() creates and initializes a new POE::Filter::Log::Procmail filter. You can pass it "Debug => 1" to turn debugging on.

get ARRAYREF

get() translates procmail log lines into hashrefs. The hashref looks like

 $VAR1 = {                                
           'subject' => 'Re: use XML::Simple breaks my PoCo::IKC::Server',
           'time' => '12:22:50',
           'date' => '1',
           'size' => '1726',
           'folder' => 'mail/perl/poe',
           'from' => 'poe-return-2605-paulv=cpan.org.org',
           'dow' => 'Thu',
           'mon' => 'Nov',
           'year' => '2004'
         };

SEE ALSO

POE::Filter.

BUGS

Doesn't support get_one(), get_one_start(), or get_pending(). This means switching from this filter to another filter probably won't work, but I haven't tried it.

Doesn't support put().

Ignores verbose lines if VERBOSE is set in .procmailrc.

AUTHOR

Paul Visscher, <paulv@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2004 by Paul Visscher

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.