This module is ALPHA code, which means that public interfaces are largely untested, and may change in future releases. Use with caution! Please report any errors back to eryq@zeegee.com as soon as you can.
MIME::Parser::Results - results of the last entity parsed
### Do parse, get results:
my $entity = eval { $parser->parse(\*STDIN); };
my $results = $parser->results;
### Get all messages logged:
@msgs = $results->msgs;
### Get messages of specific types (also tests if there were problems):
$had_errors = $results->errors;
$had_warnings = $results->warnings;
### Get outermost header:
$top_head = $results->top_head;
": ";
the current types are debug, warning, and error.
Eryq (
All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
$Revision: 5.207 $