---
name: "MIME::Parser::Results"
section: "3pm"
platform: "linux"
package: "perl-mime-tools"
version: "5.518-1"
release: "Arch Linux 2026-11-01"
platforms: ["linux"]
url: "https://new.carta.tech/MIME::Parser::Results"
---

# MIME::Parser::Results(3pm)

results of the last entity parsed

## NAME

MIME::Parser::Results - results of the last entity parsed

## SYNOPSIS

Before reading further, you should see MIME::Parser to make sure that you understand where this module fits into the grand scheme of things. Go on, do it now.  I'll wait.

Ready?  Ok...

```
   ### 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;
```

## DESCRIPTION

Results from the last MIME::Parser parse.

## PUBLIC INTERFACE

- new

  *Constructor.*

- msgs

  *Instance method.* Return all messages that we logged, in order. Every message is a string beginning with its type followed by `": "`; the current types are `"debug"`, `"warning"`, and `"error"`.

- errors

  *Instance method.* Return all error messages that we logged, in order. A convenience front-end onto **msgs()**.

- warnings

  *Instance method.* Return all warning messages that we logged, in order. A convenience front-end onto **msgs()**.

- top\_head

  *Instance method.* Return the topmost header, if we were able to read it. This may be useful if the parse fails.

## SEE ALSO

MIME::Tools, MIME::Parser

## AUTHOR

Eryq (*eryq@zeegee.com*), ZeeGee Software Inc (*http://www.zeegee.com*).

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